home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: LaTeX Document
(document/latex).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| LaTeX Document (document/latex)
| magic
| Supported |
| 99%
| dexvert
| Texinfo Document (document/texInfo)
| magic
| Supported |
| 1%
| dexvert
| MultiMate Document (document/multiMate)
| ext
| Unsupported |
| 1%
| dexvert
| WANG Integrated Word Processor (document/wangIWP)
| ext
| Unsupported |
| 1%
| dexvert
| Excellence! Document (document/excellenceDocument)
| ext
| Unsupported |
| 1%
| dexvert
| IBM DisplayWrite Document (document/ibmDisplayWriteDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| TeX document text
| default
| |
| 99%
| file
| LaTeX document text
| default
| |
| 98%
| file
| LaTeX auxiliary file, ASCII text
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 25 20 24 49 64 3a 20 | 78 79 6d 61 74 72 69 78 |%% $Id: |xymatrix|
|00000010| 2e 64 6f 63 2c 76 20 32 | 2e 31 32 20 31 39 39 34 |.doc,v 2|.12 1994|
|00000020| 2f 31 30 2f 32 35 20 31 | 31 3a 33 34 3a 32 35 20 |/10/25 1|1:34:25 |
|00000030| 6b 72 69 73 20 45 78 70 | 20 24 0a 25 25 0a 25 25 |kris Exp| $.%%.%%|
|00000040| 20 58 59 2d 70 69 63 20 | 60 60 4d 61 74 72 69 78 | XY-pic |``Matrix|
|00000050| 27 27 20 66 65 61 74 75 | 72 65 2e 0a 25 25 20 43 |'' featu|re..%% C|
|00000060| 6f 70 79 72 69 67 68 74 | 20 28 63 29 20 31 39 39 |opyright| (c) 199|
|00000070| 31 2d 31 39 39 34 20 20 | 4b 72 69 73 74 6f 66 66 |1-1994 |Kristoff|
|00000080| 65 72 20 48 2e 20 52 6f | 73 65 20 20 3c 6b 72 69 |er H. Ro|se <kri|
|00000090| 73 40 64 69 6b 75 2e 64 | 6b 3e 0a 25 25 0a 25 25 |s@diku.d|k>.%%.%%|
|000000a0| 20 54 68 69 73 20 66 69 | 6c 65 20 69 73 20 70 61 | This fi|le is pa|
|000000b0| 72 74 20 6f 66 20 74 68 | 65 20 58 59 2d 70 69 63 |rt of th|e XY-pic|
|000000c0| 20 70 61 63 6b 61 67 65 | 20 66 6f 72 20 67 72 61 | package| for gra|
|000000d0| 70 68 73 20 61 6e 64 20 | 64 69 61 67 72 61 6d 73 |phs and |diagrams|
|000000e0| 20 69 6e 20 54 65 58 2e | 0a 25 25 20 53 65 65 20 | in TeX.|.%% See |
|000000f0| 74 68 65 20 63 6f 6d 70 | 61 6e 69 6f 6e 20 52 45 |the comp|anion RE|
|00000100| 41 44 4d 45 20 61 6e 64 | 20 49 4e 53 54 41 4c 4c |ADME and| INSTALL|
|00000110| 20 66 69 6c 65 73 20 66 | 6f 72 20 66 75 72 74 68 | files f|or furth|
|00000120| 65 72 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 2e 0a |er infor|mation..|
|00000130| 25 25 20 43 6f 70 79 72 | 69 67 68 74 20 28 63 29 |%% Copyr|ight (c)|
|00000140| 20 31 39 39 31 2d 31 39 | 39 34 20 20 4b 72 69 73 | 1991-19|94 Kris|
|00000150| 74 6f 66 66 65 72 20 48 | 2e 20 52 6f 73 65 20 20 |toffer H|. Rose |
|00000160| 3c 6b 72 69 73 40 64 69 | 6b 75 2e 64 6b 3e 0a 25 |<kris@di|ku.dk>.%|
|00000170| 25 0a 25 25 20 54 68 65 | 20 58 59 2d 70 69 63 20 |%.%% The| XY-pic |
|00000180| 70 61 63 6b 61 67 65 20 | 69 73 20 66 72 65 65 20 |package |is free |
|00000190| 73 6f 66 74 77 61 72 65 | 3b 20 79 6f 75 20 63 61 |software|; you ca|
|000001a0| 6e 20 72 65 64 69 73 74 | 72 69 62 75 74 65 20 69 |n redist|ribute i|
|000001b0| 74 20 61 6e 64 2f 6f 72 | 20 6d 6f 64 69 66 79 0a |t and/or| modify.|
|000001c0| 25 25 20 69 74 20 75 6e | 64 65 72 20 74 68 65 20 |%% it un|der the |
|000001d0| 74 65 72 6d 73 20 6f 66 | 20 74 68 65 20 47 4e 55 |terms of| the GNU|
|000001e0| 20 47 65 6e 65 72 61 6c | 20 50 75 62 6c 69 63 20 | General| Public |
|000001f0| 4c 69 63 65 6e 73 65 20 | 61 73 20 70 75 62 6c 69 |License |as publi|
|00000200| 73 68 65 64 20 62 79 20 | 74 68 65 0a 25 25 20 46 |shed by |the.%% F|
|00000210| 72 65 65 20 53 6f 66 74 | 77 61 72 65 20 46 6f 75 |ree Soft|ware Fou|
|00000220| 6e 64 61 74 69 6f 6e 3b | 20 65 69 74 68 65 72 20 |ndation;| either |
|00000230| 76 65 72 73 69 6f 6e 20 | 32 20 6f 66 20 74 68 65 |version |2 of the|
|00000240| 20 4c 69 63 65 6e 73 65 | 2c 20 6f 72 20 28 61 74 | License|, or (at|
|00000250| 20 79 6f 75 72 0a 25 25 | 20 6f 70 74 69 6f 6e 29 | your.%%| option)|
|00000260| 20 61 6e 79 20 6c 61 74 | 65 72 20 76 65 72 73 69 | any lat|er versi|
|00000270| 6f 6e 2e 0a 25 25 0a 25 | 25 20 54 68 65 20 58 59 |on..%%.%|% The XY|
|00000280| 2d 70 69 63 20 70 61 63 | 6b 61 67 65 20 69 73 20 |-pic pac|kage is |
|00000290| 64 69 73 74 72 69 62 75 | 74 65 64 20 69 6e 20 74 |distribu|ted in t|
|000002a0| 68 65 20 68 6f 70 65 20 | 74 68 61 74 20 69 74 20 |he hope |that it |
|000002b0| 77 69 6c 6c 20 62 65 20 | 75 73 65 66 75 6c 2c 20 |will be |useful, |
|000002c0| 62 75 74 0a 25 25 20 57 | 49 54 48 4f 55 54 20 41 |but.%% W|ITHOUT A|
|000002d0| 4e 59 20 57 41 52 52 41 | 4e 54 59 3b 20 77 69 74 |NY WARRA|NTY; wit|
|000002e0| 68 6f 75 74 20 65 76 65 | 6e 20 74 68 65 20 69 6d |hout eve|n the im|
|000002f0| 70 6c 69 65 64 20 77 61 | 72 72 61 6e 74 79 20 6f |plied wa|rranty o|
|00000300| 66 20 4d 45 52 43 48 41 | 4e 54 41 42 49 4c 49 54 |f MERCHA|NTABILIT|
|00000310| 59 0a 25 25 20 6f 72 20 | 46 49 54 4e 45 53 53 20 |Y.%% or |FITNESS |
|00000320| 46 4f 52 20 41 20 50 41 | 52 54 49 43 55 4c 41 52 |FOR A PA|RTICULAR|
|00000330| 20 50 55 52 50 4f 53 45 | 2e 20 20 53 65 65 20 74 | PURPOSE|. See t|
|00000340| 68 65 20 47 4e 55 20 47 | 65 6e 65 72 61 6c 20 50 |he GNU G|eneral P|
|00000350| 75 62 6c 69 63 20 4c 69 | 63 65 6e 73 65 0a 25 25 |ublic Li|cense.%%|
|00000360| 20 66 6f 72 20 6d 6f 72 | 65 20 64 65 74 61 69 6c | for mor|e detail|
|00000370| 73 2e 0a 25 25 0a 25 25 | 20 59 6f 75 20 73 68 6f |s..%%.%%| You sho|
|00000380| 75 6c 64 20 68 61 76 65 | 20 72 65 63 65 69 76 65 |uld have| receive|
|00000390| 64 20 61 20 63 6f 70 79 | 20 6f 66 20 74 68 65 20 |d a copy| of the |
|000003a0| 47 4e 55 20 47 65 6e 65 | 72 61 6c 20 50 75 62 6c |GNU Gene|ral Publ|
|000003b0| 69 63 20 4c 69 63 65 6e | 73 65 20 61 6c 6f 6e 67 |ic Licen|se along|
|000003c0| 0a 25 25 20 77 69 74 68 | 20 74 68 69 73 20 70 61 |.%% with| this pa|
|000003d0| 63 6b 61 67 65 3b 20 69 | 66 20 6e 6f 74 2c 20 77 |ckage; i|f not, w|
|000003e0| 72 69 74 65 20 74 6f 20 | 74 68 65 20 46 72 65 65 |rite to |the Free|
|000003f0| 20 53 6f 66 74 77 61 72 | 65 20 46 6f 75 6e 64 61 | Softwar|e Founda|
|00000400| 74 69 6f 6e 2c 20 49 6e | 63 2e 2c 0a 25 25 20 36 |tion, In|c.,.%% 6|
|00000410| 37 35 20 4d 61 73 73 20 | 41 76 65 2c 20 43 61 6d |75 Mass |Ave, Cam|
|00000420| 62 72 69 64 67 65 2c 20 | 4d 41 20 30 32 31 33 39 |bridge, |MA 02139|
|00000430| 2c 20 55 53 41 2e 0a 25 | 25 0a 5c 69 66 78 5c 78 |, USA..%|%.\ifx\x|
|00000440| 79 6c 6f 61 64 65 64 5c | 75 6e 64 65 66 69 6e 65 |yloaded\|undefine|
|00000450| 64 20 5c 69 6e 70 75 74 | 20 78 79 20 5c 66 69 0a |d \input| xy \fi.|
|00000460| 0a 5c 78 79 70 72 6f 76 | 69 64 65 7b 6d 61 74 72 |.\xyprov|ide{matr|
|00000470| 69 78 7d 7b 4d 61 74 72 | 69 78 20 66 65 61 74 75 |ix}{Matr|ix featu|
|00000480| 72 65 7d 7b 5c 73 74 72 | 69 70 52 43 53 24 52 65 |re}{\str|ipRCS$Re|
|00000490| 76 69 73 69 6f 6e 3a 20 | 32 2e 31 32 20 24 7d 25 |vision: |2.12 $}%|
|000004a0| 0a 20 7b 4b 72 69 73 74 | 6f 66 66 65 72 20 48 2e |. {Krist|offer H.|
|000004b0| 7e 52 6f 73 65 7d 7b 6b | 72 69 73 40 64 69 6b 75 |~Rose}{k|ris@diku|
|000004c0| 2e 64 6b 7d 25 0a 20 7b | 43 6f 6d 70 75 74 65 72 |.dk}%. {|Computer|
|000004d0| 20 53 63 69 65 6e 63 65 | 2c 20 55 6e 69 76 65 72 | Science|, Univer|
|000004e0| 73 69 74 79 20 6f 66 20 | 43 6f 70 65 6e 68 61 67 |sity of |Copenhag|
|000004f0| 65 6e 2c 20 55 6e 69 76 | 65 72 73 69 74 65 74 73 |en, Univ|ersitets|
|00000500| 70 61 72 6b 65 6e 7e 31 | 2c 0a 20 20 44 4b 2d 2d |parken~1|,. DK--|
|00000510| 32 31 30 30 20 4b 7b 5c | 6f 7d 62 65 6e 68 61 76 |2100 K{\|o}benhav|
|00000520| 6e 7e 7b 5c 4f 7d 7d 0a | 0a 5c 44 4f 43 4d 4f 44 |n~{\O}}.|.\DOCMOD|
|00000530| 45 33 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |E3%%%%%%|%%%%%%%%|
|00000540| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000550| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000560| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000570| 25 25 25 25 25 25 25 25 | 0a 0a 09 54 68 69 73 20 |%%%%%%%%|...This |
|00000580| 6f 70 74 69 6f 6e 20 69 | 6d 70 6c 65 6d 65 6e 74 |option i|mplement|
|00000590| 73 20 60 60 5c 58 59 2d | 6d 61 74 72 69 63 65 73 |s ``\XY-|matrices|
|000005a0| 27 27 2c 20 5c 69 65 2c | 20 6d 61 74 72 69 63 65 |'', \ie,| matrice|
|000005b0| 73 20 77 68 65 72 65 20 | 69 74 20 69 73 0a 09 70 |s where |it is..p|
|000005c0| 6f 73 73 69 62 6c 65 20 | 74 6f 20 72 65 66 65 72 |ossible |to refer|
|000005d0| 20 74 6f 20 74 68 65 20 | 65 6e 74 72 79 20 6f 62 | to the |entry ob|
|000005e0| 6a 65 63 74 73 20 62 79 | 20 74 68 65 69 72 20 72 |jects by| their r|
|000005f0| 6f 77 2f 63 6f 6c 75 6d | 6e 20 61 64 64 72 65 73 |ow/colum|n addres|
|00000600| 73 2e 0a 09 57 65 20 66 | 69 72 73 74 20 64 65 73 |s...We f|irst des|
|00000610| 63 72 69 62 65 20 74 68 | 65 20 67 65 6e 65 72 61 |cribe th|e genera|
|00000620| 6c 20 66 6f 72 6d 20 6f | 66 20 5c 58 59 2d 6d 61 |l form o|f \XY-ma|
|00000630| 74 72 69 63 65 73 20 69 | 6e 7e 5c 53 3f 3f 5b 6d |trices i|n~\S??[m|
|00000640| 61 74 72 69 78 5d 2c 0a | 09 74 68 65 6e 20 69 6e |atrix],.|.then in|
|00000650| 7e 5c 53 3f 3f 5b 63 6f | 6f 72 64 5d 20 77 65 20 |~\S??[co|ord] we |
|00000660| 73 75 6d 6d 61 72 69 73 | 65 20 74 68 65 20 6e 65 |summaris|e the ne|
|00000670| 77 20 3c 63 6f 6f 72 64 | 3e 69 6e 61 74 65 20 66 |w <coord|>inate f|
|00000680| 6f 72 6d 73 20 75 73 65 | 64 20 74 6f 0a 09 72 65 |orms use|d to..re|
|00000690| 66 65 72 20 74 6f 20 65 | 6e 74 72 69 65 73 2e 20 |fer to e|ntries. |
|000006a0| 20 49 6e 7e 5c 53 3f 3f | 5b 73 70 61 63 69 6e 67 | In~\S??|[spacing|
|000006b0| 5d 20 77 65 20 65 78 70 | 6c 61 69 6e 20 77 68 61 |] we exp|lain wha|
|000006c0| 74 20 70 61 72 61 6d 65 | 74 65 72 73 20 63 61 6e |t parame|ters can|
|000006d0| 20 62 65 0a 09 73 65 74 | 20 74 6f 20 63 68 61 6e | be..set| to chan|
|000006e0| 67 65 20 74 68 65 20 73 | 70 61 63 69 6e 67 20 61 |ge the s|pacing a|
|000006f0| 6e 64 20 6f 72 69 65 6e | 74 61 74 69 6f 6e 20 6f |nd orien|tation o|
|00000700| 66 20 74 68 65 20 6d 61 | 74 72 69 78 2c 20 61 6e |f the ma|trix, an|
|00000710| 64 0a 09 69 6e 7e 5c 53 | 3f 3f 5b 65 6e 74 72 69 |d..in~\S|??[entri|
|00000720| 65 73 5d 20 77 65 20 65 | 78 70 6c 61 69 6e 20 68 |es] we e|xplain h|
|00000730| 6f 77 20 74 68 65 20 61 | 70 70 65 61 72 61 6e 63 |ow the a|ppearanc|
|00000740| 65 20 6f 66 20 74 68 65 | 20 65 6e 74 72 69 65 73 |e of the| entries|
|00000750| 20 63 61 6e 20 62 65 0a | 09 63 68 61 6e 67 65 64 | can be.|.changed|
|00000760| 2e 0a 0a 5c 44 4f 43 4d | 4f 44 45 32 25 25 25 25 |...\DOCM|ODE2%%%%|
|00000770| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000780| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000790| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|000007a0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|000007b0| 0a 5c 70 61 72 61 67 72 | 61 70 68 2a 7b 48 65 61 |.\paragr|aph*{Hea|
|000007c0| 64 65 72 3a 7d 5c 6c 65 | 61 76 65 76 6d 6f 64 65 |der:}\le|avevmode|
|000007d0| 0a 5c 44 4f 43 48 45 41 | 44 45 52 0a 5c 44 4f 43 |.\DOCHEA|DER.\DOC|
|000007e0| 4d 4f 44 45 33 25 25 25 | 25 25 25 25 25 25 25 25 |MODE3%%%|%%%%%%%%|
|000007f0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000800| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000810| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00000820| 25 25 25 25 25 25 25 25 | 25 0a 0a 0c 0a 5c 73 75 |%%%%%%%%|%....\su|
|00000830| 62 73 65 63 74 69 6f 6e | 7b 5c 58 59 2d 6d 61 74 |bsection|{\XY-mat|
|00000840| 72 69 63 65 73 7d 0a 3f | 3f 3d 5b 6d 61 74 72 69 |rices}.?|?=[matri|
|00000850| 78 5d 0a 25 0a 09 54 68 | 65 20 66 75 6e 64 61 6d |x].%..Th|e fundam|
|00000860| 65 6e 74 61 6c 20 63 6f | 6d 6d 61 6e 64 20 6f 66 |ental co|mmand of|
|00000870| 20 74 68 69 73 20 66 65 | 61 74 75 72 65 20 69 73 | this fe|ature is|
|00000880| 20 74 68 65 20 63 6f 6d | 6d 61 6e 64 0a 09 7c 5c | the com|mand..|\|
|00000890| 78 79 6d 61 74 72 69 78 | 7b 7c 5c 64 6f 74 73 7c |xymatrix|{|\dots||
|000008a0| 7d 7c 20 74 68 61 74 20 | 72 65 61 64 73 20 61 20 |}| that |reads a |
|000008b0| 6d 61 74 72 69 78 20 6f | 66 20 65 6e 74 72 69 65 |matrix o|f entrie|
|000008c0| 73 20 69 6e 20 74 68 65 | 20 67 65 6e 65 72 69 63 |s in the| generic|
|000008d0| 0a 09 5c 54 65 58 5c 20 | 72 6f 77 5c 26 63 6f 6c |..\TeX\ |row\&col|
|000008e0| 75 6d 6e 20 66 6f 72 6d | 61 74 2c 20 5c 69 65 2c |umn form|at, \ie,|
|000008f0| 20 77 68 65 72 65 20 72 | 6f 77 73 20 61 72 65 20 | where r|ows are |
|00000900| 73 65 70 61 72 61 74 65 | 64 20 77 69 74 68 20 7c |separate|d with ||
|00000910| 5c 5c 7c 20 61 6e 64 0a | 09 63 6f 6e 74 61 69 6e |\\| and.|.contain|
|00000920| 20 63 6f 6c 75 6d 6e 73 | 20 73 65 70 61 72 61 74 | columns| separat|
|00000930| 65 64 20 77 69 74 68 20 | 7c 26 7c 2e 20 20 54 68 |ed with ||&|. Th|
|00000940| 75 73 20 61 20 6d 61 74 | 72 69 78 20 77 69 74 68 |us a mat|rix with|
|00000950| 20 22 6d 61 78 72 6f 77 | 22 20 72 6f 77 73 0a 09 | "maxrow|" rows..|
|00000960| 61 6e 64 20 22 6d 61 78 | 63 6f 6c 22 20 63 6f 6c |and "max|col" col|
|00000970| 75 6d 6e 73 20 77 68 65 | 72 65 20 65 61 63 68 20 |umns whe|re each |
|00000980| 65 6e 74 72 79 20 63 6f | 6e 74 61 69 6e 73 20 22 |entry co|ntains "|
|00000990| 72 6f 77 22 7c 2c 7c 22 | 63 6f 6c 22 20 69 73 0a |row"|,|"|col" is.|
|000009a0| 09 65 6e 74 65 72 65 64 | 20 61 73 0a 24 24 0a 5c |.entered| as.$$.\|
|000009b0| 62 65 67 69 6e 7b 61 72 | 72 61 79 7d 7b 6c 6c 6c |begin{ar|ray}{lll|
|000009c0| 6c 7d 0a 7c 5c 78 79 6d | 61 74 72 69 78 7b 7c 5c |l}.|\xym|atrix{|\|
|000009d0| 5c 0a 7e 7b 7c 31 2c 31 | 20 26 7c 7d 09 26 7b 7c |\.~{|1,1| &|}.&{||
|000009e0| 31 2c 32 20 26 7c 7d 5c | 71 75 61 64 5c 63 64 6f |1,2 &|}\|quad\cdo|
|000009f0| 74 73 09 26 7b 7c 31 2c | 7c 22 6d 61 78 63 6f 6c |ts.&{|1,||"maxcol|
|00000a00| 22 7c 20 5c 5c 7c 7d 09 | 5c 5c 0a 7e 7b 7c 32 2c |"| \\|}.|\\.~{|2,|
|00000a10| 31 20 26 7c 7d 20 09 26 | 7b 7c 32 2c 32 20 26 7c |1 &|} .&|{|2,2 &||
|00000a20| 7d 09 09 26 7b 7c 32 2c | 7c 22 6d 61 78 63 6f 6c |}..&{|2,||"maxcol|
|00000a30| 22 7c 20 5c 5c 7c 7d 09 | 5c 5c 0a 7e 7e 5c 76 64 |"| \\|}.|\\.~~\vd|
|00000a40| 6f 74 73 09 26 5c 71 71 | 75 61 64 5c 64 64 6f 74 |ots.&\qq|uad\ddot|
|00000a50| 73 09 09 09 09 09 5c 5c | 0a 7e 7b 22 6d 61 78 72 |s.....\\|.~{"maxr|
|00000a60| 6f 77 22 7c 2c 31 20 26 | 7c 7d 26 7b 22 6d 61 78 |ow"|,1 &||}&{"max|
|00000a70| 72 6f 77 22 7c 2c 32 20 | 26 7c 7d 09 26 7b 22 6d |row"|,2 |&|}.&{"m|
|00000a80| 61 78 72 6f 77 22 7c 2c | 7c 22 6d 61 78 63 6f 6c |axrow"|,||"maxcol|
|00000a90| 22 7c 20 7d 7c 7d 0a 5c | 65 6e 64 7b 61 72 72 61 |"| }|}.\|end{arra|
|00000aa0| 79 7d 0a 24 24 0a 09 28 | 5c 54 65 58 5c 2d 6e 69 |y}.$$..(|\TeX\-ni|
|00000ab0| 63 61 6c 6c 79 20 74 68 | 65 20 7c 26 7c 20 63 68 |cally th|e |&| ch|
|00000ac0| 61 72 61 63 74 65 72 20 | 72 65 70 72 65 73 65 6e |aracter |represen|
|00000ad0| 74 73 20 61 6e 79 20 60 | 61 6c 69 67 6e 6d 65 6e |ts any `|alignmen|
|00000ae0| 74 20 74 61 62 27 2c 20 | 5c 69 65 2c 0a 09 63 68 |t tab', |\ie,..ch|
|00000af0| 61 72 61 63 74 65 72 20 | 77 69 74 68 20 63 61 74 |aracter |with cat|
|00000b00| 65 67 6f 72 79 20 63 6f | 64 65 7e 34 29 2e 0a 0a |egory co|de~4)...|
|00000b10| 09 41 20 3c 6d 61 74 72 | 69 78 3e 20 63 61 6e 20 |.A <matr|ix> can |
|00000b20| 61 70 70 65 61 72 20 65 | 69 74 68 65 72 20 69 6e |appear e|ither in|
|00000b30| 20 61 6e 20 5c 58 59 2d | 70 69 63 74 75 72 65 20 | an \XY-|picture |
|00000b40| 28 61 73 20 3c 64 65 63 | 6f 72 3e 29 20 6f 72 0a |(as <dec|or>) or.|
|00000b50| 09 60 60 73 74 61 6e 64 | 2d 61 6c 6f 6e 65 27 27 |.``stand|-alone''|
|00000b60| 2e 0a 0a 09 54 68 65 20 | 70 6f 69 6e 74 73 20 77 |....The |points w|
|00000b70| 68 65 72 65 20 7c 5c 78 | 79 6d 61 74 72 69 78 7c |here |\x|ymatrix||
|00000b80| 20 69 73 20 64 69 66 66 | 65 72 65 6e 74 20 66 72 | is diff|erent fr|
|00000b90| 6f 6d 20 6f 72 64 69 6e | 61 72 79 20 6d 61 74 72 |om ordin|ary matr|
|00000ba0| 69 78 0a 09 63 6f 6e 73 | 74 72 75 63 74 69 6f 6e |ix..cons|truction|
|00000bb0| 73 20 28 6c 69 6b 65 20 | 70 6c 61 69 6e 20 5c 54 |s (like |plain \T|
|00000bc0| 65 58 27 73 20 7c 5c 6d | 61 74 72 69 78 7b 7c 5c |eX's |\m|atrix{|\|
|00000bd0| 64 6f 74 73 7c 7d 7c 20 | 61 6e 64 20 5c 4c 61 54 |dots|}| |and \LaT|
|00000be0| 65 58 27 73 0a 09 7c 61 | 72 72 61 79 7c 20 65 6e |eX's..|a|rray| en|
|00000bf0| 76 69 72 6f 6e 6d 65 6e | 74 29 20 61 72 65 0a 25 |vironmen|t) are.%|
|00000c00| 0a 5c 62 65 67 69 6e 7b | 69 74 65 6d 69 7a 65 7d |.\begin{|itemize}|
|00000c10| 0a 5c 69 74 65 6d 0a 09 | 61 72 62 69 74 72 61 72 |.\item..|arbitrar|
|00000c20| 79 20 5c 58 59 2d 70 69 | 63 20 3c 64 65 63 6f 72 |y \XY-pi|c <decor|
|00000c30| 3e 61 74 69 6f 6e 73 20 | 6d 61 79 20 62 65 20 73 |>ations |may be s|
|00000c40| 70 65 63 69 66 69 65 64 | 20 69 6e 20 65 61 63 68 |pecified| in each|
|00000c50| 20 65 6e 74 72 79 20 61 | 6e 64 0a 09 77 69 6c 6c | entry a|nd..will|
|00000c60| 20 62 65 20 69 6e 74 65 | 72 70 72 65 74 65 64 20 | be inte|rpreted |
|00000c70| 69 6e 20 61 20 73 74 61 | 74 65 20 77 68 65 72 65 |in a sta|te where|
|00000c80| 20 24 63 24 20 69 73 20 | 74 68 65 20 63 75 72 72 | $c$ is |the curr|
|00000c90| 65 6e 74 20 65 6e 74 72 | 79 2c 0a 5c 69 74 65 6d |ent entr|y,.\item|
|00000ca0| 0a 09 74 68 65 20 65 6e | 74 69 72 65 20 6d 61 74 |..the en|tire mat|
|00000cb0| 72 69 78 20 69 73 20 61 | 6e 20 6f 62 6a 65 63 74 |rix is a|n object|
|00000cc0| 20 69 74 73 65 6c 66 20 | 77 69 74 68 20 72 65 66 | itself |with ref|
|00000cd0| 65 72 65 6e 63 65 20 70 | 6f 69 6e 74 20 61 73 20 |erence p|oint as |
|00000ce0| 74 68 65 20 74 6f 70 0a | 09 6c 65 66 74 20 65 6e |the top.|.left en|
|00000cf0| 74 72 79 2c 20 61 6e 64 | 0a 5c 69 74 65 6d 0a 09 |try, and|.\item..|
|00000d00| 61 20 70 72 6f 67 72 65 | 73 73 20 6d 65 73 73 61 |a progre|ss messa|
|00000d10| 67 65 20 60 60 7c 3c 78 | 79 6d 61 74 72 69 78 7c |ge ``|<x|ymatrix||
|00000d20| 20 22 72 6f 77 73 22 7c | 78 7c 22 63 6f 6c 73 22 | "rows"||x|"cols"|
|00000d30| 20 22 73 69 7a 65 22 7c | 3e 7c 27 27 20 69 73 0a | "size"||>|'' is.|
|00000d40| 09 70 72 69 6e 74 65 64 | 20 66 6f 72 20 65 61 63 |.printed| for eac|
|00000d50| 68 20 6d 61 74 72 69 78 | 20 77 69 74 68 20 24 22 |h matrix| with $"|
|00000d60| 72 6f 77 73 22 5c 74 69 | 6d 65 73 22 63 6f 6c 73 |rows"\ti|mes"cols|
|00000d70| 22 24 20 65 6e 74 72 69 | 65 73 20 61 6e 64 20 5c |"$ entri|es and \|
|00000d80| 58 59 2d 70 69 63 0a 09 | 63 6f 6d 70 6c 65 78 69 |XY-pic..|complexi|
|00000d90| 74 79 20 22 73 69 7a 65 | 22 20 28 74 68 65 20 6e |ty "size|" (the n|
|00000da0| 75 6d 62 65 72 20 6f 66 | 20 70 72 69 6d 69 74 69 |umber of| primiti|
|00000db0| 76 65 20 6f 70 65 72 61 | 74 69 6f 6e 73 20 70 65 |ve opera|tions pe|
|00000dc0| 72 66 6f 72 6d 65 64 29 | 2e 0a 5c 69 74 65 6d 0a |rformed)|..\item.|
|00000dd0| 09 45 6e 74 72 69 65 73 | 20 73 74 61 72 74 69 6e |.Entries| startin|
|00000de0| 67 20 77 69 74 68 20 61 | 20 7c 2a 7c 20 61 72 65 |g with a| |*| are|
|00000df0| 20 73 70 65 63 69 61 6c | 20 28 64 65 73 63 72 69 | special| (descri|
|00000e00| 62 65 64 0a 09 69 6e 7e | 5c 53 3f 3f 5b 65 6e 74 |bed..in~|\S??[ent|
|00000e10| 72 69 65 73 5d 29 5c 66 | 6f 6f 74 6e 6f 74 65 7b |ries])\f|ootnote{|
|00000e20| 49 6e 20 67 65 6e 65 72 | 61 6c 20 69 74 20 69 73 |In gener|al it is|
|00000e30| 20 72 65 63 6f 6d 6d 65 | 6e 64 65 64 20 74 68 61 | recomme|nded tha|
|00000e40| 74 20 65 6e 74 72 69 65 | 73 0a 09 73 74 61 72 74 |t entrie|s..start|
|00000e50| 20 77 69 74 68 20 61 20 | 6e 6f 6e 2d 65 78 70 61 | with a |non-expa|
|00000e60| 6e 64 69 6e 67 20 74 6f | 6b 65 6e 2c 20 5c 69 65 |nding to|ken, \ie|
|00000e70| 2c 20 61 6e 20 6f 72 64 | 69 6e 61 72 79 20 28 6e |, an ord|inary (n|
|00000e80| 6f 6e 2d 61 63 74 69 76 | 65 29 0a 09 63 68 61 72 |on-activ|e)..char|
|00000e90| 61 63 74 65 72 2c 20 7b | 5c 74 74 5c 6f 74 68 65 |acter, {|\tt\othe|
|00000ea0| 72 62 67 72 6f 75 70 7d | 2c 20 6f 72 20 7c 5c 72 |rbgroup}|, or |\r|
|00000eb0| 65 6c 61 78 7c 2e 7d 2c | 20 73 6f 20 75 73 65 20 |elax|.},| so use |
|00000ec0| 7c 7b 2a 7d 7c 20 74 6f | 20 67 65 74 20 61 0a 09 ||{*}| to| get a..|
|00000ed0| 24 5c 73 74 61 72 24 2e | 0a 5c 65 6e 64 7b 69 74 |$\star$.|.\end{it|
|00000ee0| 65 6d 69 7a 65 7d 0a 25 | 0a 09 46 6f 72 20 65 78 |emize}.%|..For ex|
|00000ef0| 61 6d 70 6c 65 2c 0a 25 | 0a 5c 62 65 67 69 6e 7b |ample,.%|.\begin{|
|00000f00| 63 6f 64 65 7d 0a 24 24 | 5c 78 79 0a 20 5c 78 79 |code}.$$|\xy. \xy|
|00000f10| 6d 61 74 72 69 78 7b 41 | 26 42 5c 5c 43 26 44 7d |matrix{A|&B\\C&D}|
|00000f20| 0a 20 5c 64 72 6f 70 5c | 66 72 6d 7b 2d 7d 0a 20 |. \drop\|frm{-}. |
|00000f30| 5c 64 72 6f 70 5c 63 69 | 72 3c 38 70 74 3e 7b 7d |\drop\ci|r<8pt>{}|
|00000f40| 0a 5c 65 6e 64 78 79 24 | 24 0a 5c 65 6e 64 7b 63 |.\endxy$|$.\end{c|
|00000f50| 6f 64 65 7d 0a 5c 64 69 | 73 70 6c 61 79 63 6f 64 |ode}.\di|splaycod|
|00000f60| 65 0a 25 0a 5c 6e 6f 69 | 6e 64 65 6e 74 0a 09 77 |e.%.\noi|ndent..w|
|00000f70| 69 6c 6c 20 74 79 70 65 | 73 65 74 0a 25 0a 5c 64 |ill type|set.%.\d|
|00000f80| 6f 63 6f 64 65 0a 25 0a | 09 49 6e 20 66 61 63 74 |ocode.%.|.In fact|
|00000f90| 20 65 6e 74 72 69 65 73 | 20 6f 66 20 6f 6e 65 20 | entries| of one |
|00000fa0| 6d 61 74 72 69 78 20 6d | 61 79 20 72 65 66 65 72 |matrix m|ay refer|
|00000fb0| 20 74 6f 20 65 6e 74 72 | 69 65 73 20 6f 66 20 61 | to entr|ies of a|
|00000fc0| 6e 6f 74 68 65 72 20 62 | 79 0a 09 75 73 69 6e 67 |nother b|y..using|
|00000fd0| 20 74 68 65 20 3c 70 6f | 73 3e 20 73 61 76 65 20 | the <po|s> save |
|00000fe0| 6d 65 63 68 61 6e 69 73 | 6d 3a 0a 25 0a 5c 62 65 |mechanis|m:.%.\be|
|00000ff0| 67 69 6e 7b 63 6f 64 65 | 7d 0a 24 24 5c 78 79 0a |gin{code|}.$$\xy.|
|00001000| 20 20 5c 78 79 6d 61 74 | 72 69 78 20 7b 0a 20 20 | \xymat|rix {. |
|00001010| 20 41 5c 50 4f 53 3d 22 | 41 22 20 26 20 42 5c 50 | A\POS="|A" & B\P|
|00001020| 4f 53 3d 22 42 22 20 5c | 5c 0a 20 20 20 43 5c 50 |OS="B" \|\. C\P|
|00001030| 4f 53 3d 22 43 22 20 26 | 20 44 5c 50 4f 53 3d 22 |OS="C" &| D\POS="|
|00001040| 44 22 20 7d 0a 20 20 5c | 50 4f 53 2a 5c 66 72 6d |D" }. \|POS*\frm|
|00001050| 7b 2d 2d 7d 0a 20 20 5c | 50 4f 53 2d 28 31 30 2c |{--}. \|POS-(10,|
|00001060| 33 29 0a 20 20 5c 78 79 | 6d 61 74 72 69 78 20 7b |3). \xy|matrix {|
|00001070| 0a 20 20 20 41 27 5c 50 | 4f 53 3b 22 41 22 2a 2a |. A'\P|OS;"A"**|
|00001080| 5c 64 69 72 7b 2e 7d 0a | 09 20 20 20 20 20 26 20 |\dir{.}.|. & |
|00001090| 42 27 5c 50 4f 53 3b 22 | 42 22 2a 2a 5c 64 69 72 |B'\POS;"|B"**\dir|
|000010a0| 7b 2e 7d 20 5c 5c 0a 20 | 20 20 43 27 5c 50 4f 53 |{.} \\. | C'\POS|
|000010b0| 3b 22 43 22 2a 2a 5c 64 | 69 72 7b 2e 7d 0a 09 20 |;"C"**\d|ir{.}.. |
|000010c0| 20 20 20 20 26 20 44 27 | 5c 50 4f 53 3b 22 44 22 | & D'|\POS;"D"|
|000010d0| 2a 2a 5c 64 69 72 7b 2e | 7d 20 7d 0a 20 20 5c 50 |**\dir{.|} }. \P|
|000010e0| 4f 53 2a 5c 66 72 6d 7b | 2d 2d 7d 0a 5c 65 6e 64 |OS*\frm{|--}.\end|
|000010f0| 78 79 24 24 0a 5c 65 6e | 64 7b 63 6f 64 65 7d 0a |xy$$.\en|d{code}.|
|00001100| 5c 64 6f 63 6f 64 65 0a | 25 0a 09 77 61 73 20 74 |\docode.|%..was t|
|00001110| 79 70 65 73 65 74 20 28 | 75 73 69 6e 67 20 74 68 |ypeset (|using th|
|00001120| 65 20 60 66 72 61 6d 65 | 27 20 65 78 74 65 6e 73 |e `frame|' extens|
|00001130| 69 6f 6e 29 20 62 79 0a | 25 0a 5c 64 69 73 70 6c |ion) by.|%.\displ|
|00001140| 61 79 63 6f 64 65 0a 0a | 09 5c 42 55 47 3a 20 4d |aycode..|.\BUG: M|
|00001150| 61 74 72 69 63 65 73 20 | 63 61 6e 6e 6f 74 20 62 |atrices |cannot b|
|00001160| 65 20 6e 65 73 74 65 64 | 2e 0a 0a 5c 44 4f 43 4d |e nested|...\DOCM|
|00001170| 4f 44 45 32 25 25 25 25 | 25 25 25 25 25 25 25 25 |ODE2%%%%|%%%%%%%%|
|00001180| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00001190| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|000011a0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|000011b0| 25 25 25 25 25 25 25 25 | 25 25 0a 0a 5c 70 61 72 |%%%%%%%%|%%..\par|
|000011c0| 61 67 72 61 70 68 2a 7b | 4f 6e 20 74 68 65 20 66 |agraph*{|On the f|
|000011d0| 6f 6c 6c 6f 77 69 6e 67 | 20 63 6f 64 65 3a 7d 0a |ollowing| code:}.|
|000011e0| 0a 09 54 68 65 20 63 6f | 6d 70 6c 65 78 69 74 79 |..The co|mplexity|
|000011f0| 20 6f 66 20 74 68 69 73 | 20 6f 70 74 69 6f 6e 20 | of this| option |
|00001200| 73 74 65 6d 73 20 66 72 | 6f 6d 20 74 68 65 20 66 |stems fr|om the f|
|00001210| 61 63 74 20 74 68 61 74 | 20 77 65 20 63 61 6e 6e |act that| we cann|
|00001220| 6f 74 0a 09 62 75 69 6c | 64 20 74 68 65 20 61 63 |ot..buil|d the ac|
|00001230| 74 75 61 6c 20 5c 58 59 | 2d 70 69 63 74 75 72 65 |tual \XY|-picture|
|00001240| 20 75 6e 74 69 6c 20 61 | 66 74 65 72 20 74 68 65 | until a|fter the|
|00001250| 20 6d 61 74 72 69 78 20 | 68 61 73 20 62 65 65 6e | matrix |has been|
|00001260| 20 74 79 70 65 73 65 74 | 0a 09 73 6f 20 74 68 61 | typeset|..so tha|
|00001270| 74 20 77 65 20 6b 6e 6f | 77 20 74 68 65 20 73 69 |t we kno|w the si|
|00001280| 7a 65 73 20 61 6e 64 20 | 70 6c 61 63 65 73 20 6f |zes and |places o|
|00001290| 66 20 61 6c 6c 20 74 68 | 65 20 65 6e 74 72 69 65 |f all th|e entrie|
|000012a0| 73 2e 20 20 54 68 65 0a | 09 68 61 6e 64 6c 69 6e |s. The.|.handlin|
|000012b0| 67 20 64 65 73 63 72 69 | 62 65 64 20 68 65 72 65 |g descri|bed here|
|000012c0| 20 69 73 20 74 68 75 73 | 20 73 65 70 61 72 61 74 | is thus| separat|
|000012d0| 65 64 20 69 6e 74 6f 20 | 73 65 76 65 72 61 6c 20 |ed into |several |
|000012e0| 73 75 62 70 72 6f 63 65 | 64 75 72 65 73 2e 0a 0a |subproce|dures...|
|000012f0| 5c 70 61 72 61 67 72 61 | 70 68 2a 7b 53 65 74 75 |\paragra|ph*{Setu|
|00001300| 70 3a 7d 0a 0a 09 4e 6f | 74 20 6d 75 63 68 2d 2d |p:}...No|t much--|
|00001310| 2d 6f 6e 6c 79 20 74 6f | 20 6b 65 65 70 20 74 72 |-only to| keep tr|
|00001320| 61 63 6b 20 6f 66 20 74 | 68 65 20 72 6f 77 73 20 |ack of t|he rows |
|00001330| 61 6e 64 20 63 6f 6c 75 | 6d 6e 73 2e 20 20 54 68 |and colu|mns. Th|
|00001340| 65 73 65 20 61 72 65 20 | 6e 6f 74 0a 09 61 63 63 |ese are |not..acc|
|00001350| 65 73 69 62 6c 65 20 74 | 6f 20 74 68 65 20 75 73 |esible t|o the us|
|00001360| 65 72 2d 2d 2d 73 68 6f | 75 6c 64 20 74 68 65 79 |er---sho|uld they|
|00001370| 3f 0a 0a 5c 44 4f 43 4d | 4f 44 45 28 0a 5c 78 79 |?..\DOCM|ODE(.\xy|
|00001380| 6e 65 77 40 7b 63 6f 75 | 6e 74 7d 5c 72 6f 77 40 |new@{cou|nt}\row@|
|00001390| 0a 5c 78 79 6e 65 77 40 | 7b 63 6f 75 6e 74 7d 5c |.\xynew@|{count}\|
|000013a0| 63 6f 6c 40 0a 0a 5c 78 | 79 6c 65 74 40 5c 6d 61 |col@..\x|ylet@\ma|
|000013b0| 78 72 6f 77 40 3d 5c 7a | 40 09 09 25 20 68 69 67 |xrow@=\z|@..% hig|
|000013c0| 68 65 73 74 20 72 6f 77 | 20 6e 75 6d 62 65 72 20 |hest row| number |
|000013d0| 75 73 65 64 0a 5c 78 79 | 6c 65 74 40 5c 6d 61 78 |used.\xy|let@\max|
|000013e0| 63 6f 6c 40 3d 5c 7a 40 | 09 09 25 20 68 69 67 68 |col@=\z@|..% high|
|000013f0| 65 73 74 20 63 6f 6c 75 | 6d 6e 20 6e 75 6d 62 65 |est colu|mn numbe|
|00001400| 72 20 75 73 65 64 0a 5c | 78 79 6c 65 74 40 5c 6d |r used.\|xylet@\m|
|00001410| 61 78 63 6f 6c 72 6f 77 | 40 3d 5c 7a 40 09 09 25 |axcolrow|@=\z@..%|
|00001420| 20 61 20 72 6f 77 20 77 | 69 74 68 20 6d 61 78 69 | a row w|ith maxi|
|00001430| 6d 61 6c 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 6f |mal numb|er of co|
|00001440| 6c 75 6d 6e 73 0a 5c 44 | 4f 43 4d 4f 44 45 29 0a |lumns.\D|OCMODE).|
|00001450| 0a 09 54 68 65 72 65 20 | 61 72 65 20 73 6f 6d 65 |..There |are some|
|00001460| 20 75 73 65 72 2d 64 65 | 66 69 6e 65 64 20 70 61 | user-de|fined pa|
|00001470| 72 61 6d 65 74 65 72 73 | 20 73 75 6d 6d 61 72 69 |rameters| summari|
|00001480| 73 65 64 20 6c 61 74 65 | 72 2e 0a 0a 09 54 68 65 |sed late|r....The|
|00001490| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 69 73 20 61 6e | followi|ng is an|
|000014a0| 20 65 78 70 65 72 69 6d | 65 6e 74 61 6c 20 73 65 | experim|ental se|
|000014b0| 74 20 6f 66 20 60 6f 70 | 74 69 6d 61 6c 27 20 71 |t of `op|timal' q|
|000014c0| 75 65 75 65 69 6e 67 20 | 6d 61 63 72 6f 73 0a 09 |ueueing |macros..|
|000014d0| 75 73 69 6e 67 20 74 77 | 6f 20 71 75 65 75 65 73 |using tw|o queues|
|000014e0| 20 61 6e 64 20 74 77 6f | 20 63 6f 75 6e 74 65 72 | and two| counter|
|000014f0| 73 20 74 6f 20 6b 65 65 | 70 20 74 72 61 63 6b 20 |s to kee|p track |
|00001500| 6f 66 20 74 68 65 20 70 | 72 6f 67 72 65 73 73 2e |of the p|rogress.|
|00001510| 0a 0a 5c 44 4f 43 4d 4f | 44 45 28 0a 5c 78 79 6e |..\DOCMO|DE(.\xyn|
|00001520| 65 77 40 7b 74 6f 6b 73 | 7d 5c 71 75 65 75 65 40 |ew@{toks|}\queue@|
|00001530| 0a 5c 78 79 6e 65 77 40 | 7b 74 6f 6b 73 7d 5c 71 |.\xynew@|{toks}\q|
|00001540| 75 65 75 65 40 40 0a 0a | 5c 78 79 6e 65 77 40 7b |ueue@@..|\xynew@{|
|00001550| 63 6f 75 6e 74 7d 5c 71 | 63 6f 75 6e 74 40 0a 5c |count}\q|count@.\|
|00001560| 78 79 6e 65 77 40 7b 63 | 6f 75 6e 74 7d 5c 71 63 |xynew@{c|ount}\qc|
|00001570| 6f 75 6e 74 40 40 0a 0a | 5c 78 79 64 65 66 40 5c |ount@@..|\xydef@\|
|00001580| 63 6c 65 61 72 71 40 7b | 25 0a 20 5c 67 6c 6f 62 |clearq@{|%. \glob|
|00001590| 61 6c 5c 71 75 65 75 65 | 40 3d 7b 7d 5c 67 6c 6f |al\queue|@={}\glo|
|000015a0| 62 61 6c 5c 71 63 6f 75 | 6e 74 40 3d 5c 40 6e 65 |bal\qcou|nt@=\@ne|
|000015b0| 0a 20 5c 67 6c 6f 62 61 | 6c 5c 71 75 65 75 65 40 |. \globa|l\queue@|
|000015c0| 40 3d 7b 7d 5c 67 6c 6f | 62 61 6c 5c 71 63 6f 75 |@={}\glo|bal\qcou|
|000015d0| 6e 74 40 40 3d 5c 7a 40 | 7d 0a 0a 5c 78 79 64 65 |nt@@=\z@|}..\xyde|
|000015e0| 66 40 5c 61 64 64 71 40 | 23 31 7b 5c 67 6c 6f 62 |f@\addq@|#1{\glob|
|000015f0| 61 6c 5c 61 64 76 61 6e | 63 65 5c 6d 61 74 72 69 |al\advan|ce\matri|
|00001600| 78 73 69 7a 65 40 5c 40 | 6e 65 0a 20 5c 69 66 6e |xsize@\@|ne. \ifn|
|00001610| 75 6d 5c 71 63 6f 75 6e | 74 40 40 3c 5c 71 63 6f |um\qcoun|t@@<\qco|
|00001620| 75 6e 74 40 20 5c 6c 65 | 74 5c 61 64 64 71 40 40 |unt@ \le|t\addq@@|
|00001630| 3d 5c 61 64 64 71 40 69 | 0a 20 5c 65 6c 73 65 20 |=\addq@i|. \else |
|00001640| 5c 6c 65 74 5c 61 64 64 | 71 40 40 3d 5c 61 64 64 |\let\add|q@@=\add|
|00001650| 71 40 69 69 20 5c 66 69 | 0a 20 5c 65 78 70 61 6e |q@ii \fi|. \expan|
|00001660| 64 61 66 74 65 72 5c 61 | 64 64 71 40 40 5c 74 68 |dafter\a|ddq@@\th|
|00001670| 65 5c 71 75 65 75 65 40 | 40 5c 61 64 64 71 40 40 |e\queue@|@\addq@@|
|00001680| 7b 23 31 7d 7d 0a 0a 5c | 78 79 6c 65 74 40 5c 61 |{#1}}..\|xylet@\a|
|00001690| 64 64 71 40 40 3d 5c 72 | 65 6c 61 78 0a 0a 5c 78 |ddq@@=\r|elax..\x|
|000016a0| 79 64 65 66 40 5c 61 64 | 64 71 40 69 23 31 5c 61 |ydef@\ad|dq@i#1\a|
|000016b0| 64 64 71 40 40 23 32 7b | 25 0a 20 5c 67 6c 6f 62 |ddq@@#2{|%. \glob|
|000016c0| 61 6c 5c 61 64 76 61 6e | 63 65 5c 71 63 6f 75 6e |al\advan|ce\qcoun|
|000016d0| 74 40 40 5c 40 6e 65 20 | 5c 67 6c 6f 62 61 6c 5c |t@@\@ne |\global\|
|000016e0| 71 75 65 75 65 40 40 3d | 7b 23 31 23 32 7d 7d 0a |queue@@=|{#1#2}}.|
|000016f0| 0a 5c 78 79 64 65 66 40 | 5c 61 64 64 71 40 69 69 |.\xydef@|\addq@ii|
|00001700| 23 31 5c 61 64 64 71 40 | 40 23 32 7b 25 0a 20 5c |#1\addq@|@#2{%. \|
|00001710| 67 6c 6f 62 61 6c 5c 61 | 64 76 61 6e 63 65 5c 71 |global\a|dvance\q|
|00001720| 63 6f 75 6e 74 40 5c 40 | 6e 65 20 5c 67 6c 6f 62 |count@\@|ne \glob|
|00001730| 61 6c 5c 71 63 6f 75 6e | 74 40 40 3d 5c 7a 40 20 |al\qcoun|t@@=\z@ |
|00001740| 0a 20 5c 67 6c 6f 62 61 | 6c 5c 71 75 65 75 65 40 |. \globa|l\queue@|
|00001750| 3d 5c 65 78 70 61 6e 64 | 61 66 74 65 72 7b 5c 74 |=\expand|after{\t|
|00001760| 68 65 5c 71 75 65 75 65 | 40 23 31 23 32 7d 5c 67 |he\queue|@#1#2}\g|
|00001770| 6c 6f 62 61 6c 5c 71 75 | 65 75 65 40 40 3d 7b 7d |lobal\qu|eue@@={}|
|00001780| 7d 0a 0a 5c 78 79 64 65 | 66 40 5c 66 69 6e 69 73 |}..\xyde|f@\finis|
|00001790| 68 71 40 7b 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |hq@{\exp|andafter|
|000017a0| 5c 61 64 64 71 40 69 69 | 5c 74 68 65 5c 71 75 65 |\addq@ii|\the\que|
|000017b0| 75 65 40 40 5c 61 64 64 | 71 40 40 7b 7d 7d 0a 5c |ue@@\add|q@@{}}.\|
|000017c0| 44 4f 43 4d 4f 44 45 29 | 0a 0a 09 5c 48 41 43 4b |DOCMODE)|...\HACK|
|000017d0| 3a 20 69 6e 74 65 6e 64 | 65 64 20 74 6f 20 6d 61 |: intend|ed to ma|
|000017e0| 6b 65 20 74 68 65 20 61 | 64 64 69 74 69 6f 6e 20 |ke the a|ddition |
|000017f0| 6f 66 20 74 6f 6b 65 6e | 73 20 74 6f 20 74 68 65 |of token|s to the|
|00001800| 20 74 6f 6b 65 6e 20 6c | 69 73 74 0a 09 66 61 73 | token l|ist..fas|
|00001810| 74 65 72 3a 20 77 65 20 | 66 69 72 73 74 20 61 64 |ter: we |first ad|
|00001820| 64 20 74 6f 20 74 68 65 | 20 60 73 6d 61 6c 6c 27 |d to the| `small'|
|00001830| 20 7c 5c 71 75 65 75 65 | 40 40 7c 20 61 73 20 6d | |\queue|@@| as m|
|00001840| 61 6e 79 20 74 69 6d 65 | 73 20 61 73 20 77 65 0a |any time|s as we.|
|00001850| 09 68 61 76 65 20 61 64 | 64 65 64 20 74 6f 20 74 |.have ad|ded to t|
|00001860| 68 65 20 60 62 69 67 27 | 20 7c 5c 71 75 65 75 65 |he `big'| |\queue|
|00001870| 40 7c 20 62 65 66 6f 72 | 65 20 74 68 61 74 2e 20 |@| befor|e that. |
|00001880| 20 53 6f 20 77 65 20 6b | 6e 6f 77 20 77 65 20 73 | So we k|now we s|
|00001890| 68 6f 75 6c 64 0a 09 61 | 6c 77 61 79 73 20 65 78 |hould..a|lways ex|
|000018a0| 70 61 6e 64 20 7c 5c 71 | 75 65 75 65 40 40 7c 3a |pand |\q|ueue@@|:|
|000018b0| 20 74 68 69 73 20 69 73 | 20 64 6f 6e 65 20 66 69 | this is| done fi|
|000018c0| 72 73 74 20 28 6c 61 73 | 74 20 69 6e 20 74 68 65 |rst (las|t in the|
|000018d0| 20 6d 61 63 72 6f 0a 09 | 74 65 78 74 29 2e 20 20 | macro..|text). |
|000018e0| 54 68 65 6e 20 77 65 20 | 63 61 6c 6c 20 7c 5c 61 |Then we |call |\a|
|000018f0| 64 64 71 40 40 7c 20 74 | 68 61 74 20 77 69 6c 6c |ddq@@| t|hat will|
|00001900| 20 65 69 74 68 65 72 20 | 61 64 64 20 74 6f 20 74 | either |add to t|
|00001910| 68 65 20 73 6d 61 6c 6c | 20 6f 6e 65 0a 09 6f 72 |he small| one..or|
|00001920| 20 61 64 64 20 74 68 65 | 20 73 6d 61 6c 6c 20 6f | add the| small o|
|00001930| 6e 65 20 74 6f 20 74 68 | 65 20 62 69 67 20 6f 6e |ne to th|e big on|
|00001940| 65 20 61 6e 64 20 74 68 | 65 6e 20 63 6c 65 61 72 |e and th|en clear|
|00001950| 20 74 68 65 20 73 6d 61 | 6c 6c 20 6f 6e 65 21 0a | the sma|ll one!.|
|00001960| 0a 09 22 55 73 61 67 65 | 22 3a 20 43 61 6c 6c 20 |.."Usage|": Call |
|00001970| 7c 5c 63 6c 65 61 72 71 | 40 7c 20 66 69 72 73 74 ||\clearq|@| first|
|00001980| 2e 20 20 54 68 65 6e 20 | 75 73 65 20 7c 5c 61 64 |. Then |use |\ad|
|00001990| 64 71 40 7c 20 61 73 20 | 6d 61 6e 79 20 74 69 6d |dq@| as |many tim|
|000019a0| 65 73 20 61 73 0a 09 64 | 65 73 69 72 65 64 2e 20 |es as..d|esired. |
|000019b0| 20 54 6f 20 67 65 74 20 | 74 68 65 20 71 75 65 75 | To get |the queu|
|000019c0| 65 20 69 6e 20 7c 5c 71 | 75 65 75 65 40 7c 20 63 |e in |\q|ueue@| c|
|000019d0| 61 6c 6c 20 7c 5c 66 69 | 6e 69 73 68 71 40 7c 20 |all |\fi|nishq@| |
|000019e0| 61 6e 64 20 75 73 65 20 | 69 74 2e 0a 09 46 69 6e |and use |it...Fin|
|000019f0| 61 6c 6c 79 20 63 6c 65 | 61 72 20 7c 5c 71 75 65 |ally cle|ar |\que|
|00001a00| 75 65 40 7c 20 28 67 6c | 6f 62 61 6c 6c 79 29 20 |ue@| (gl|obally) |
|00001a10| 6f 72 20 63 6f 6e 74 69 | 6e 75 65 2e 0a 0a 5c 70 |or conti|nue...\p|
|00001a20| 61 72 61 67 72 61 70 68 | 2a 7b 4d 61 69 6e 20 70 |aragraph|*{Main p|
|00001a30| 72 6f 63 65 64 75 72 65 | 3a 7d 0a 0a 09 48 65 72 |rocedure|:}...Her|
|00001a40| 65 20 69 73 20 74 68 65 | 20 6d 61 69 6e 20 63 6f |e is the| main co|
|00001a50| 64 65 20 77 68 69 63 68 | 20 69 73 20 63 6f 6e 63 |de which| is conc|
|00001a60| 65 72 6e 65 64 20 77 69 | 74 68 20 69 6e 69 74 69 |erned wi|th initi|
|00001a70| 61 6c 69 73 61 74 69 6f | 6e 73 20 61 6e 64 0a 09 |alisatio|ns and..|
|00001a80| 6f 75 74 70 75 74 20 6f | 66 20 6d 65 73 73 61 67 |output o|f messag|
|00001a90| 65 73 20 65 78 70 6c 61 | 69 6e 69 6e 67 20 68 6f |es expla|ining ho|
|00001aa0| 77 20 66 61 72 20 74 68 | 65 20 6d 61 74 72 69 78 |w far th|e matrix|
|00001ab0| 20 63 6f 6e 73 74 72 75 | 63 74 69 6f 6e 20 68 61 | constru|ction ha|
|00001ac0| 73 0a 09 70 72 6f 67 72 | 65 73 73 65 64 2e 0a 0a |s..progr|essed...|
|00001ad0| 5c 44 4f 43 4d 4f 44 45 | 28 0a 5c 78 79 6e 65 77 |\DOCMODE|(.\xynew|
|00001ae0| 40 7b 63 6f 75 6e 74 7d | 5c 6d 61 74 72 69 78 73 |@{count}|\matrixs|
|00001af0| 69 7a 65 40 0a 0a 5c 78 | 79 64 65 66 40 5c 78 79 |ize@..\x|ydef@\xy|
|00001b00| 6d 61 74 72 69 78 7b 5c | 6d 65 73 73 61 67 65 7b |matrix{\|message{|
|00001b10| 3c 78 79 6d 61 74 72 69 | 78 7d 5c 67 6c 6f 62 61 |<xymatri|x}\globa|
|00001b20| 6c 5c 6d 61 74 72 69 78 | 73 69 7a 65 40 3d 5c 7a |l\matrix|size@=\z|
|00001b30| 40 0a 20 5c 69 66 5c 69 | 6e 78 79 40 20 5c 44 4e |@. \if\i|nxy@ \DN|
|00001b40| 40 7b 5c 78 79 40 40 7b | 5c 6e 74 65 72 40 7b 7d |@{\xy@@{|\nter@{}|
|00001b50| 7d 7d 25 0a 20 5c 65 6c | 73 65 20 5c 44 4e 40 7b |}}%. \el|se \DN@{|
|00001b60| 5c 78 79 5c 78 79 74 72 | 61 63 69 6e 67 5c 78 79 |\xy\xytr|acing\xy|
|00001b70| 40 40 7b 5c 6e 74 65 72 | 40 5c 65 6e 64 78 79 7d |@@{\nter|@\endxy}|
|00001b80| 7d 5c 66 69 20 5c 6e 65 | 78 74 40 0a 20 5c 78 79 |}\fi \ne|xt@. \xy|
|00001b90| 40 7b 4d 41 54 52 49 58 | 7d 7b 5c 73 61 76 65 40 |@{MATRIX|}{\save@|
|00001ba0| 20 5c 65 64 65 66 5c 6d | 61 74 72 69 78 6f 72 69 | \edef\m|atrixori|
|00001bb0| 67 69 6e 40 7b 5c 58 63 | 3d 5c 74 68 65 5c 58 63 |gin@{\Xc|=\the\Xc|
|00001bc0| 20 5c 59 63 3d 5c 74 68 | 65 5c 59 63 7d 7d 25 0a | \Yc=\th|e\Yc}}%.|
|00001bd0| 20 5c 78 79 46 4e 40 5c | 78 79 6d 61 74 72 69 78 | \xyFN@\|xymatrix|
|00001be0| 40 7d 0a 0a 5c 78 79 64 | 65 66 40 5c 78 79 6d 61 |@}..\xyd|ef@\xyma|
|00001bf0| 74 72 69 78 40 7b 25 0a | 20 5c 61 64 64 41 54 40 |trix@{%.| \addAT@|
|00001c00| 5c 69 66 78 5c 6e 65 78 | 74 20 5c 61 64 64 41 54 |\ifx\nex|t \addAT|
|00001c10| 40 5c 44 4e 40 7b 25 0a | 20 20 20 5c 61 66 74 65 |@\DN@{%.| \afte|
|00001c20| 72 44 49 52 45 43 54 49 | 4f 4e 6f 72 45 4d 50 54 |rDIRECTI|ONorEMPT|
|00001c30| 59 7b 5c 78 79 6d 61 74 | 72 69 78 40 72 6f 74 61 |Y{\xymat|rix@rota|
|00001c40| 74 69 6f 6e 20 5c 78 79 | 46 4e 40 5c 78 79 6d 61 |tion \xy|FN@\xyma|
|00001c50| 74 72 69 78 40 7d 7b 5c | 78 79 46 4e 40 5c 78 79 |trix@}{\|xyFN@\xy|
|00001c60| 6d 61 74 72 69 78 40 7d | 7d 25 0a 20 5c 65 6c 73 |matrix@}|}%. \els|
|00001c70| 65 20 5c 6c 65 74 5c 6e | 65 78 74 40 3d 5c 78 79 |e \let\n|ext@=\xy|
|00001c80| 6d 61 74 72 69 78 40 69 | 20 5c 66 69 20 5c 6e 65 |matrix@i| \fi \ne|
|00001c90| 78 74 40 7d 0a 0a 5c 78 | 79 64 65 66 40 5c 78 79 |xt@}..\x|ydef@\xy|
|00001ca0| 6d 61 74 72 69 78 40 69 | 23 31 23 7b 5c 44 4e 40 |matrix@i|#1#{\DN@|
|00001cb0| 7b 23 31 7d 5c 69 66 78 | 5c 6e 65 78 74 40 5c 65 |{#1}\ifx|\next@\e|
|00001cc0| 6d 70 74 79 20 5c 65 78 | 70 61 6e 64 61 66 74 65 |mpty \ex|pandafte|
|00001cd0| 72 5c 78 79 6d 61 74 72 | 69 78 40 69 69 0a 20 5c |r\xymatr|ix@ii. \|
|00001ce0| 65 6c 73 65 20 5c 78 79 | 65 72 72 6f 72 40 7b 5c |else \xy|error@{\|
|00001cf0| 73 74 72 69 6e 67 5c 78 | 79 6d 61 74 72 69 78 3a |string\x|ymatrix:|
|00001d00| 20 7b 3c 72 6f 77 73 3e | 7d 20 65 78 70 65 63 74 | {<rows>|} expect|
|00001d10| 65 64 7d 7b 7d 5c 66 69 | 7d 0a 0a 5c 78 79 64 65 |ed}{}\fi|}..\xyde|
|00001d20| 66 40 5c 78 79 6d 61 74 | 72 69 78 40 69 69 23 31 |f@\xymat|rix@ii#1|
|00001d30| 7b 25 0a 20 5c 78 79 6d | 61 74 72 69 78 40 70 72 |{%. \xym|atrix@pr|
|00001d40| 65 74 79 70 65 73 65 74 | 7b 23 31 7d 5c 6d 65 73 |etypeset|{#1}\mes|
|00001d50| 73 61 67 65 7b 5c 6d 61 | 78 63 6f 6c 40 20 78 5c |sage{\ma|xcol@ x\|
|00001d60| 6d 61 78 72 6f 77 40 7d | 25 0a 20 5c 78 79 6d 61 |maxrow@}|%. \xyma|
|00001d70| 74 72 69 78 40 6d 65 61 | 73 75 72 65 69 74 20 5c |trix@mea|sureit \|
|00001d80| 78 79 6d 61 74 72 69 78 | 40 73 65 74 75 70 0a 20 |xymatrix|@setup. |
|00001d90| 5c 78 79 6d 61 74 72 69 | 78 40 74 79 70 65 73 65 |\xymatri|x@typese|
|00001da0| 74 7b 23 31 7d 5c 72 65 | 73 74 6f 72 65 20 5c 78 |t{#1}\re|store \x|
|00001db0| 79 6d 61 74 72 69 78 40 | 69 6e 73 65 72 74 0a 20 |ymatrix@|insert. |
|00001dc0| 5c 78 79 40 40 5c 6c 65 | 61 76 65 40 20 5c 6d 65 |\xy@@\le|ave@ \me|
|00001dd0| 73 73 61 67 65 7b 5c 74 | 68 65 5c 6d 61 74 72 69 |ssage{\t|he\matri|
|00001de0| 78 73 69 7a 65 40 3e 7d | 5c 69 67 6e 6f 72 65 73 |xsize@>}|\ignores|
|00001df0| 70 61 63 65 73 7d 0a 5c | 44 4f 43 4d 4f 44 45 29 |paces}.\|DOCMODE)|
|00001e00| 0a 0a 09 5c 54 4f 44 4f | 3a 20 50 72 6f 70 65 72 |...\TODO|: Proper|
|00001e10| 20 6e 65 73 74 69 6e 67 | 20 74 68 61 74 20 65 6e | nesting| that en|
|00001e20| 73 75 72 65 73 20 74 68 | 61 74 20 74 68 65 20 6d |sures th|at the m|
|00001e30| 61 74 72 69 78 20 73 74 | 61 74 65 20 69 73 0a 09 |atrix st|ate is..|
|00001e40| 72 65 65 73 74 61 62 6c | 69 73 68 65 64 20 61 66 |reestabl|ished af|
|00001e50| 74 65 72 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |ter the |current |
|00001e60| 6f 6e 65 20 68 61 73 20 | 62 65 65 6e 20 74 79 70 |one has |been typ|
|00001e70| 65 73 65 74 2e 0a 0a 09 | 45 61 63 68 20 73 75 62 |eset....|Each sub|
|00001e80| 70 72 6f 63 65 64 75 72 | 65 20 69 73 20 65 78 70 |procedur|e is exp|
|00001e90| 6c 61 69 6e 65 64 20 62 | 65 6c 6f 77 2e 0a 0a 5c |lained b|elow...\|
|00001ea0| 70 61 72 61 67 72 61 70 | 68 2a 7b 53 65 74 20 72 |paragrap|h*{Set r|
|00001eb0| 6f 77 2d 72 6f 74 61 74 | 69 6f 6e 3a 7d 0a 0a 09 |ow-rotat|ion:}...|
|00001ec0| 54 68 69 73 20 73 65 74 | 73 20 74 68 65 20 67 65 |This set|s the ge|
|00001ed0| 6e 65 72 61 6c 20 64 69 | 72 65 63 74 69 6f 6e 20 |neral di|rection |
|00001ee0| 6f 66 20 74 68 65 20 72 | 6f 77 73 20 61 73 20 74 |of the r|ows as t|
|00001ef0| 68 65 20 63 75 72 72 65 | 6e 74 20 64 69 72 65 63 |he curre|nt direc|
|00001f00| 74 69 6f 6e 0a 09 69 6e | 64 69 63 61 74 65 73 2e |tion..in|dicates.|
|00001f10| 20 20 54 68 69 73 20 64 | 69 72 65 63 74 69 6f 6e | This d|irection|
|00001f20| 20 69 73 20 6e 6f 74 20 | 6b 6e 6f 77 6e 20 75 6e | is not |known un|
|00001f30| 74 69 6c 20 5c 58 59 2d | 74 69 6d 65 20 73 6f 20 |til \XY-|time so |
|00001f40| 69 74 20 67 65 74 73 20 | 70 75 74 0a 09 69 6e 74 |it gets |put..int|
|00001f50| 6f 20 74 68 65 20 72 6f | 77 2f 63 6f 6c 75 6d 6e |o the ro|w/column|
|00001f60| 20 64 65 66 69 6e 69 74 | 69 6f 6e 73 2e 0a 0a 5c | definit|ions...\|
|00001f70| 44 4f 43 4d 4f 44 45 28 | 0a 5c 78 79 64 65 66 40 |DOCMODE(|.\xydef@|
|00001f80| 5c 78 79 6d 61 74 72 69 | 78 63 6f 73 40 40 7b 31 |\xymatri|xcos@@{1|
|00001f90| 7d 0a 5c 78 79 64 65 66 | 40 5c 78 79 6d 61 74 72 |}.\xydef|@\xymatr|
|00001fa0| 69 78 73 69 6e 40 40 7b | 30 7d 0a 0a 5c 78 79 64 |ixsin@@{|0}..\xyd|
|00001fb0| 65 66 40 5c 78 79 6d 61 | 74 72 69 78 40 72 6f 74 |ef@\xyma|trix@rot|
|00001fc0| 61 74 69 6f 6e 7b 25 0a | 20 5c 78 79 40 40 7b 5c |ation{%.| \xy@@{\|
|00001fd0| 65 64 65 66 5c 78 79 6d | 61 74 72 69 78 63 6f 73 |edef\xym|atrixcos|
|00001fe0| 40 40 7b 5c 63 6f 73 44 | 69 72 65 63 74 69 6f 6e |@@{\cosD|irection|
|00001ff0| 7d 5c 65 64 65 66 5c 78 | 79 6d 61 74 72 69 78 73 |}\edef\x|ymatrixs|
|00002000| 69 6e 40 40 7b 5c 73 69 | 6e 44 69 72 65 63 74 69 |in@@{\si|nDirecti|
|00002010| 6f 6e 7d 7d 7d 0a 5c 44 | 4f 43 4d 4f 44 45 29 0a |on}}}.\D|OCMODE).|
|00002020| 0a 5c 70 61 72 61 67 72 | 61 70 68 2a 7b 50 72 65 |.\paragr|aph*{Pre|
|00002030| 74 79 70 65 73 65 74 3a | 7d 0a 0a 09 54 68 65 20 |typeset:|}...The |
|00002040| 70 75 72 70 6f 73 65 20 | 6f 66 20 74 68 69 73 20 |purpose |of this |
|00002050| 69 73 20 74 6f 0a 25 0a | 5c 62 65 67 69 6e 7b 69 |is to.%.|\begin{i|
|00002060| 74 65 6d 69 7a 65 7d 0a | 5c 69 74 65 6d 0a 09 73 |temize}.|\item..s|
|00002070| 65 74 20 62 6f 78 38 20 | 74 6f 20 61 6e 20 68 61 |et box8 |to an ha|
|00002080| 6c 69 67 6e 20 77 69 74 | 68 20 61 6c 6c 20 74 68 |lign wit|h all th|
|00002090| 65 20 65 6e 74 72 69 65 | 73 20 70 72 6f 70 65 72 |e entrie|s proper|
|000020a0| 6c 79 20 74 79 70 65 73 | 65 74 20 74 6f 20 62 65 |ly types|et to be|
|000020b0| 0a 09 6d 65 61 73 75 72 | 65 64 20 69 6e 20 74 68 |..measur|ed in th|
|000020c0| 65 20 6e 65 78 74 20 73 | 74 65 70 2c 20 61 6e 64 |e next s|tep, and|
|000020d0| 0a 5c 69 74 65 6d 0a 09 | 73 74 6f 72 65 20 69 6e |.\item..|store in|
|000020e0| 20 61 20 71 75 65 75 65 | 20 74 68 65 20 6f 70 65 | a queue| the ope|
|000020f0| 72 61 74 69 6f 6e 73 20 | 74 68 61 74 20 77 69 6c |rations |that wil|
|00002100| 6c 20 64 65 66 69 6e 65 | 20 65 61 63 68 20 65 6e |l define| each en|
|00002110| 74 72 79 20 61 73 20 61 | 6e 0a 09 6f 62 6a 65 63 |try as a|n..objec|
|00002120| 74 20 6f 6e 63 65 20 74 | 68 65 20 6d 65 61 73 75 |t once t|he measu|
|00002130| 72 65 6d 65 6e 74 20 69 | 73 20 64 6f 6e 65 20 61 |rement i|s done a|
|00002140| 6e 64 20 74 68 65 20 64 | 69 73 74 61 6e 63 65 73 |nd the d|istances|
|00002150| 20 62 65 74 77 65 65 6e | 20 72 6f 77 73 0a 09 61 | between| rows..a|
|00002160| 6e 64 20 63 6f 6c 75 6d | 6e 73 20 69 73 20 6b 6e |nd colum|ns is kn|
|00002170| 6f 77 6e 2e 0a 5c 65 6e | 64 7b 69 74 65 6d 69 7a |own..\en|d{itemiz|
|00002180| 65 7d 0a 25 0a 09 54 68 | 69 73 20 69 73 20 61 63 |e}.%..Th|is is ac|
|00002190| 68 69 65 76 65 64 20 61 | 73 20 66 6f 6c 6c 6f 77 |hieved a|s follow|
|000021a0| 73 3a 20 52 6f 77 2f 63 | 6f 6c 75 6d 6e 20 63 6f |s: Row/c|olumn co|
|000021b0| 75 6e 74 65 72 73 2c 20 | 6d 61 78 69 6d 61 2c 20 |unters, |maxima, |
|000021c0| 61 6e 64 20 71 75 65 75 | 65 73 0a 09 61 72 65 20 |and queu|es..are |
|000021d0| 72 65 73 65 74 2e 20 20 | 54 68 65 20 74 61 62 2d |reset. |The tab-|
|000021e0| 20 61 6e 64 20 69 6e 74 | 65 72 6c 69 6e 65 73 6b | and int|erlinesk|
|000021f0| 69 70 20 69 73 20 72 65 | 6d 6f 76 65 64 20 74 6f |ip is re|moved to|
|00002200| 20 6d 61 6b 65 20 74 61 | 6b 69 6e 67 20 74 68 65 | make ta|king the|
|00002210| 0a 09 63 6f 6e 73 74 72 | 75 63 74 65 64 20 62 6f |..constr|ucted bo|
|00002220| 78 20 61 70 61 72 74 20 | 65 61 73 69 65 72 2e 20 |x apart |easier. |
|00002230| 20 41 6e 64 20 74 68 65 | 20 68 61 6c 69 67 6e 20 | And the| halign |
|00002240| 74 65 6d 70 6c 61 74 65 | 20 69 73 20 75 73 65 64 |template| is used|
|00002250| 20 74 6f 0a 09 61 70 70 | 6c 79 20 61 6e 20 61 70 | to..app|ly an ap|
|00002260| 70 72 6f 70 72 69 61 74 | 65 20 61 63 74 69 6f 6e |propriat|e action|
|00002270| 20 66 6f 72 20 65 61 63 | 68 20 65 6e 74 72 79 20 | for eac|h entry |
|00002280| 74 68 61 74 20 75 70 64 | 61 74 65 73 20 74 68 65 |that upd|ates the|
|00002290| 20 63 6f 75 6e 74 65 72 | 73 0a 09 61 6e 64 20 71 | counter|s..and q|
|000022a0| 75 65 75 65 2e 0a 0a 09 | 54 68 65 20 73 70 65 63 |ueue....|The spec|
|000022b0| 69 61 6c 20 7c 5c 78 79 | 6d 61 74 72 69 78 73 61 |ial |\xy|matrixsa|
|000022c0| 76 65 64 43 4f 4f 52 44 | 40 7c 20 69 73 20 75 73 |vedCOORD|@| is us|
|000022d0| 65 64 20 74 6f 20 73 74 | 6f 72 65 20 74 68 65 20 |ed to st|ore the |
|000022e0| 6f 72 69 67 69 6e 61 6c | 0a 09 7c 5c 43 4f 4f 52 |original|..|\COOR|
|000022f0| 44 40 7c 20 65 78 63 65 | 70 74 20 77 68 65 6e 20 |D@| exce|pt when |
|00002300| 64 69 61 67 72 61 6d 73 | 20 61 72 65 20 6e 65 73 |diagrams| are nes|
|00002310| 74 65 64 2e 0a 0a 5c 44 | 4f 43 4d 4f 44 45 28 0a |ted...\D|OCMODE(.|
|00002320| 5c 78 79 6c 65 74 40 5c | 78 79 6d 61 74 72 69 78 |\xylet@\|xymatrix|
|00002330| 73 61 76 65 64 43 4f 4f | 52 44 40 3d 5c 72 65 6c |savedCOO|RD@=\rel|
|00002340| 61 78 0a 0a 5c 78 79 64 | 65 66 40 5c 78 79 6d 61 |ax..\xyd|ef@\xyma|
|00002350| 74 72 69 78 40 70 72 65 | 74 79 70 65 73 65 74 23 |trix@pre|typeset#|
|00002360| 31 7b 5c 78 79 40 7b 4d | 41 54 52 49 58 20 50 52 |1{\xy@{M|ATRIX PR|
|00002370| 45 54 59 50 45 53 45 54 | 7d 7b 7d 25 0a 20 5c 67 |ETYPESET|}{}%. \g|
|00002380| 6c 6f 62 61 6c 5c 72 6f | 77 40 3d 5c 7a 40 20 5c |lobal\ro|w@=\z@ \|
|00002390| 67 6c 6f 62 61 6c 5c 6c | 65 74 5c 6d 61 78 63 6f |global\l|et\maxco|
|000023a0| 6c 40 3d 5c 7a 40 20 5c | 63 6c 65 61 72 71 40 0a |l@=\z@ \|clearq@.|
|000023b0| 20 5c 73 65 74 62 6f 78 | 38 3d 5c 76 74 6f 70 7b | \setbox|8=\vtop{|
|000023c0| 25 0a 20 20 5c 69 66 78 | 5c 78 79 6d 61 74 72 69 |%. \ifx|\xymatri|
|000023d0| 78 73 61 76 65 64 43 4f | 4f 52 44 40 5c 72 65 6c |xsavedCO|ORD@\rel|
|000023e0| 61 78 20 5c 6c 65 74 5c | 78 79 6d 61 74 72 69 78 |ax \let\|xymatrix|
|000023f0| 73 61 76 65 64 43 4f 4f | 52 44 40 3d 5c 43 4f 4f |savedCOO|RD@=\COO|
|00002400| 52 44 40 20 5c 66 69 0a | 20 20 5c 6c 65 74 5c 43 |RD@ \fi.| \let\C|
|00002410| 4f 4f 52 44 40 3d 5c 78 | 79 6d 61 74 72 69 78 43 |OORD@=\x|ymatrixC|
|00002420| 4f 4f 52 44 40 0a 20 20 | 5c 65 76 65 72 79 63 72 |OORD@. |\everycr|
|00002430| 7b 7d 5c 6c 65 74 5c 5c | 3d 5c 63 72 20 5c 74 61 |{}\let\\|=\cr \ta|
|00002440| 62 73 6b 69 70 3d 5c 7a | 40 20 5c 6f 66 66 69 6e |bskip=\z|@ \offin|
|00002450| 74 65 72 6c 69 6e 65 73 | 6b 69 70 0a 20 20 5c 68 |terlines|kip. \h|
|00002460| 61 6c 69 67 6e 7b 5c 70 | 72 65 6e 74 72 79 40 20 |align{\p|rentry@ |
|00002470| 23 23 21 40 26 26 5c 78 | 79 46 4e 40 5c 70 72 65 |##!@&&\x|yFN@\pre|
|00002480| 6e 74 72 79 40 40 23 23 | 21 40 5c 63 72 23 31 5c |ntry@@##|!@\cr#1\|
|00002490| 70 72 65 6e 74 72 79 40 | 40 40 5c 63 72 63 72 7d |prentry@|@@\crcr}|
|000024a0| 7d 25 0a 20 5c 78 64 65 | 66 5c 6d 61 78 72 6f 77 |}%. \xde|f\maxrow|
|000024b0| 40 7b 5c 74 68 65 5c 72 | 6f 77 40 7d 25 0a 20 5c |@{\the\r|ow@}%. \|
|000024c0| 66 69 6e 69 73 68 71 40 | 7d 0a 5c 44 4f 43 4d 4f |finishq@|}.\DOCMO|
|000024d0| 44 45 29 0a 0a 09 54 68 | 65 20 66 69 72 73 74 20 |DE)...Th|e first |
|000024e0| 65 6e 74 72 79 20 69 6e | 20 65 61 63 68 20 72 6f |entry in| each ro|
|000024f0| 77 20 69 73 20 73 70 65 | 63 69 61 6c 3b 20 69 6e |w is spe|cial; in|
|00002500| 20 70 61 72 74 69 63 75 | 6c 61 72 20 69 74 20 6d | particu|lar it m|
|00002510| 6f 76 65 73 20 74 68 65 | 0a 09 65 6e 74 72 69 65 |oves the|..entrie|
|00002520| 73 20 66 72 6f 6d 20 74 | 68 65 20 63 6f 6c 75 6d |s from t|he colum|
|00002530| 6e 73 20 6f 66 20 74 68 | 65 20 70 72 65 76 69 6f |ns of th|e previo|
|00002540| 75 73 20 72 6f 77 20 28 | 69 66 20 61 6e 79 29 20 |us row (|if any) |
|00002550| 69 6e 74 6f 20 74 68 65 | 0a 09 73 65 63 6f 6e 64 |into the|..second|
|00002560| 2d 6c 65 76 65 6c 20 71 | 75 65 75 65 3a 0a 0a 5c |-level q|ueue:..\|
|00002570| 44 4f 43 4d 4f 44 45 28 | 0a 5c 78 79 64 65 66 40 |DOCMODE(|.\xydef@|
|00002580| 5c 70 72 65 6e 74 72 79 | 40 7b 5c 72 65 6c 61 78 |\prentry|@{\relax|
|00002590| 0a 20 5c 69 66 6e 75 6d | 5c 72 6f 77 40 3e 5c 7a |. \ifnum|\row@>\z|
|000025a0| 40 0a 20 20 5c 69 66 6e | 75 6d 5c 6d 61 78 63 6f |@. \ifn|um\maxco|
|000025b0| 6c 40 3c 5c 63 6f 6c 40 | 20 5c 78 64 65 66 5c 6d |l@<\col@| \xdef\m|
|000025c0| 61 78 63 6f 6c 40 7b 5c | 74 68 65 5c 63 6f 6c 40 |axcol@{\|the\col@|
|000025d0| 7d 5c 78 64 65 66 5c 6d | 61 78 63 6f 6c 72 6f 77 |}\xdef\m|axcolrow|
|000025e0| 40 7b 5c 74 68 65 5c 72 | 6f 77 40 7d 5c 66 69 0a |@{\the\r|ow@}\fi.|
|000025f0| 20 20 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 78 | \expan|dafter\x|
|00002600| 64 65 66 5c 63 73 6e 61 | 6d 65 20 6d 61 78 63 6f |def\csna|me maxco|
|00002610| 6c 40 5c 74 68 65 5c 72 | 6f 77 40 5c 65 6e 64 63 |l@\the\r|ow@\endc|
|00002620| 73 6e 61 6d 65 7b 5c 74 | 68 65 5c 63 6f 6c 40 7d |sname{\t|he\col@}|
|00002630| 5c 66 69 0a 20 5c 67 6c | 6f 62 61 6c 5c 61 64 76 |\fi. \gl|obal\adv|
|00002640| 61 6e 63 65 5c 72 6f 77 | 40 5c 40 6e 65 20 5c 67 |ance\row|@\@ne \g|
|00002650| 6c 6f 62 61 6c 5c 63 6f | 6c 40 3d 5c 7a 40 20 5c |lobal\co|l@=\z@ \|
|00002660| 78 79 46 4e 40 5c 70 72 | 65 6e 74 72 79 40 40 7d |xyFN@\pr|entry@@}|
|00002670| 0a 5c 44 4f 43 4d 4f 44 | 45 29 0a 0a 09 54 68 65 |.\DOCMOD|E)...The|
|00002680| 20 63 6f 6d 6d 6f 6e 20 | 70 61 72 74 20 73 68 6f | common |part sho|
|00002690| 75 6c 64 20 66 69 72 73 | 74 20 74 79 70 65 73 65 |uld firs|t typese|
|000026a0| 74 20 74 68 65 20 6f 62 | 6a 65 63 74 2e 20 20 5c |t the ob|ject. \|
|000026b0| 54 4f 44 4f 3a 20 43 75 | 72 72 65 6e 74 6c 79 0a |TODO: Cu|rrently.|
|000026c0| 09 74 68 65 72 65 20 69 | 73 20 6f 6e 6c 79 20 74 |.there i|s only t|
|000026d0| 68 65 20 64 65 66 61 75 | 6c 74 20 66 6f 72 6d 61 |he defau|lt forma|
|000026e0| 74 2d 2d 2d 61 6e 20 65 | 73 63 61 70 65 20 6d 65 |t---an e|scape me|
|000026f0| 63 68 61 6e 69 73 6d 20 | 73 68 6f 75 6c 64 20 62 |chanism |should b|
|00002700| 65 0a 09 70 72 6f 76 69 | 64 65 64 20 73 75 63 68 |e..provi|ded such|
|00002710| 20 74 68 61 74 20 74 68 | 65 20 66 75 6c 6c 20 70 | that th|e full p|
|00002720| 6f 77 65 72 20 6f 66 20 | 3c 6f 62 6a 65 63 74 3e |ower of |<object>|
|00002730| 20 69 73 20 61 76 61 69 | 6c 61 62 6c 65 2e 0a 0a | is avai|lable...|
|00002740| 09 54 68 65 6e 20 69 74 | 20 73 68 6f 75 6c 64 20 |.Then it| should |
|00002750| 61 64 64 20 73 6f 6d 65 | 74 68 69 6e 67 20 73 65 |add some|thing se|
|00002760| 74 74 69 6e 67 20 24 7c | 3c 7c 58 5f 63 7c 2c 7c |tting $||<|X_c|,||
|00002770| 59 5f 63 7c 3e 7c 24 20 | 65 71 75 69 76 61 6c 65 |Y_c|>|$ |equivale|
|00002780| 6e 74 20 74 6f 0a 09 74 | 68 69 73 20 74 6f 20 74 |nt to..t|his to t|
|00002790| 68 65 20 71 75 65 75 65 | 3a 0a 24 24 0a 20 7c 22 |he queue|:.$$. |"|
|000027a0| 31 2c 31 22 7c 20 2b 20 | 7c 3c 7c 5c 61 6c 70 68 |1,1"| + ||<|\alph|
|000027b0| 61 20 58 27 20 2d 20 5c | 62 65 74 61 20 59 27 20 |a X' - \|beta Y' |
|000027c0| 7c 2c 7c 20 5c 62 65 74 | 61 20 58 27 20 2b 20 5c ||,| \bet|a X' + \|
|000027d0| 61 6c 70 68 61 20 59 27 | 20 7c 3e 7c 0a 24 24 0a |alpha Y'| |>|.$$.|
|000027e0| 09 77 69 74 68 20 24 28 | 5c 61 6c 70 68 61 2c 5c |.with $(|\alpha,\|
|000027f0| 62 65 74 61 29 24 20 74 | 68 65 20 63 75 72 72 65 |beta)$ t|he curre|
|00002800| 6e 74 20 64 69 72 65 63 | 74 69 6f 6e 20 61 6e 64 |nt direc|tion and|
|00002810| 0a 24 24 0a 20 7c 3c 7c | 58 27 7c 2c 7c 59 27 7c |.$$. |<||X'|,|Y'||
|00002820| 3e 7c 20 3d 20 7c 3c 7c | 58 5f 22 63 6f 6c 22 7c |>| = |<||X_"col"||
|00002830| 2c 7c 59 5f 22 72 6f 77 | 22 7c 3e 7c 0a 20 2b 20 |,|Y_"row|"|>|. + |
|00002840| 7c 3c 7c 5c 66 72 61 63 | 31 32 5c 74 69 6d 65 73 ||<|\frac|12\times|
|00002850| 20 57 5f 22 63 6f 6c 22 | 7c 2c 7c 20 7b 2d 7d 5c | W_"col"||,| {-}\|
|00002860| 66 72 61 63 31 32 5c 74 | 69 6d 65 73 20 48 5f 22 |frac12\t|imes H_"|
|00002870| 72 6f 77 22 20 7c 3e 7c | 0a 24 24 0a 09 77 68 65 |row" |>||.$$..whe|
|00002880| 72 65 20 24 7c 3c 7c 58 | 5f 22 63 6f 6c 22 7c 2c |re $|<|X|_"col"|,|
|00002890| 7c 59 5f 22 72 6f 77 22 | 7c 3e 7c 24 20 69 73 20 ||Y_"row"||>|$ is |
|000028a0| 74 68 65 20 75 70 70 65 | 72 20 6c 65 66 74 20 63 |the uppe|r left c|
|000028b0| 6f 72 6e 65 72 20 6f 66 | 20 74 68 65 0a 09 62 6f |orner of| the..bo|
|000028c0| 75 6e 64 69 6e 67 20 62 | 6f 78 20 6f 66 20 74 68 |unding b|ox of th|
|000028d0| 65 20 65 6e 74 72 79 2c | 20 24 7c 3c 7c 57 5f 22 |e entry,| $|<|W_"|
|000028e0| 63 6f 6c 22 7c 2c 7c 48 | 5f 22 72 6f 77 22 7c 3e |col"|,|H|_"row"|>|
|000028f0| 7c 24 20 69 73 20 74 68 | 65 20 77 69 64 74 68 20 ||$ is th|e width |
|00002900| 61 6e 64 0a 09 68 65 69 | 67 68 74 20 6f 66 20 74 |and..hei|ght of t|
|00002910| 68 65 20 62 6f 75 6e 64 | 69 6e 67 20 62 6f 78 2e |he bound|ing box.|
|00002920| 20 20 46 75 72 74 68 65 | 72 6d 6f 72 65 20 74 68 | Furthe|rmore th|
|00002930| 65 20 63 6f 64 65 20 73 | 68 6f 75 6c 64 20 73 65 |e code s|hould se|
|00002940| 74 20 74 68 65 20 65 64 | 67 65 0a 09 61 6e 64 20 |t the ed|ge..and |
|00002950| 65 78 74 65 6e 74 73 20 | 6f 66 20 74 68 65 20 63 |extents |of the c|
|00002960| 75 72 65 6e 74 20 6f 62 | 6a 65 63 74 2e 0a 0a 09 |urent ob|ject....|
|00002970| 57 68 69 6c 65 20 74 79 | 70 65 73 65 74 74 69 6e |While ty|pesettin|
|00002980| 67 20 74 68 65 20 65 6e | 74 72 79 2c 20 5c 58 59 |g the en|try, \XY|
|00002990| 2d 63 6f 6d 6d 61 6e 64 | 73 20 61 72 65 20 22 64 |-command|s are "d|
|000029a0| 69 73 61 62 6c 65 64 22 | 20 62 79 0a 09 72 65 64 |isabled"| by..red|
|000029b0| 65 66 69 6e 69 6e 67 20 | 7c 5c 78 79 40 7c 20 74 |efining ||\xy@| t|
|000029c0| 6f 20 6a 75 73 74 20 60 | 65 61 74 27 20 69 74 73 |o just `|eat' its|
|000029d0| 20 61 72 67 75 6d 65 6e | 74 73 2c 20 73 6f 20 74 | argumen|ts, so t|
|000029e0| 68 65 79 20 64 6f 6e 27 | 74 0a 09 69 6e 74 65 72 |hey don'|t..inter|
|000029f0| 66 65 72 65 5c 64 6f 74 | 73 0a 0a 5c 44 4f 43 4d |fere\dot|s..\DOCM|
|00002a00| 4f 44 45 28 0a 5c 78 79 | 6c 65 74 40 5c 6c 61 73 |ODE(.\xy|let@\las|
|00002a10| 74 70 72 65 6e 74 72 79 | 40 40 3d 5c 72 65 6c 61 |tprentry|@@=\rela|
|00002a20| 78 0a 0a 5c 78 79 64 65 | 66 40 5c 78 79 65 61 74 |x..\xyde|f@\xyeat|
|00002a30| 61 6c 6c 40 7b 5c 6c 65 | 74 5c 78 79 40 3d 5c 78 |all@{\le|t\xy@=\x|
|00002a40| 79 65 61 74 40 20 5c 6c | 65 74 5c 6f 78 79 40 3d |yeat@ \l|et\oxy@=|
|00002a50| 5c 78 79 65 61 74 40 20 | 5c 6c 65 74 5c 78 79 40 |\xyeat@ |\let\xy@|
|00002a60| 40 69 78 40 3d 5c 65 61 | 74 40 7d 0a 0a 5c 78 79 |@ix@=\ea|t@}..\xy|
|00002a70| 64 65 66 40 5c 70 72 65 | 6e 74 72 79 40 40 7b 5c |def@\pre|ntry@@{\|
|00002a80| 67 6c 6f 62 61 6c 5c 61 | 64 76 61 6e 63 65 5c 63 |global\a|dvance\c|
|00002a90| 6f 6c 40 5c 40 6e 65 0a | 20 5c 6c 65 74 5c 6e 65 |ol@\@ne.| \let\ne|
|00002aa0| 78 74 40 3d 5c 70 72 65 | 6e 74 72 79 40 40 6e 6f |xt@=\pre|ntry@@no|
|00002ab0| 72 6d 0a 20 5c 69 66 6f | 6c 64 78 79 6d 61 74 72 |rm. \ifo|ldxymatr|
|00002ac0| 69 78 40 5c 65 6c 73 65 | 20 5c 69 66 78 20 2a 5c |ix@\else| \ifx *\|
|00002ad0| 6e 65 78 74 20 5c 44 4e | 40 2a 23 23 31 23 23 7b |next \DN|@*##1##{|
|00002ae0| 5c 70 72 65 6e 74 72 79 | 40 40 73 74 61 72 7b 23 |\prentry|@@star{#|
|00002af0| 23 31 7d 7d 5c 66 69 20 | 5c 66 69 0a 20 5c 6e 65 |#1}}\fi |\fi. \ne|
|00002b00| 78 74 40 7d 0a 0a 5c 78 | 79 64 65 66 40 5c 70 72 |xt@}..\x|ydef@\pr|
|00002b10| 65 6e 74 72 79 40 40 73 | 74 61 72 23 31 23 32 23 |entry@@s|tar#1#2#|
|00002b20| 33 21 40 7b 5c 67 64 65 | 66 5c 6c 61 73 74 70 72 |3!@{\gde|f\lastpr|
|00002b30| 65 6e 74 72 79 40 40 7b | 2a 23 31 7b 23 32 7d 23 |entry@@{|*#1{#2}#|
|00002b40| 33 7d 25 0a 20 5c 73 65 | 74 62 6f 78 5c 6c 61 73 |3}%. \se|tbox\las|
|00002b50| 74 6f 62 6a 65 63 74 62 | 6f 78 40 3d 5c 6f 62 6a |tobjectb|ox@=\obj|
|00002b60| 65 63 74 23 31 7b 23 32 | 7d 25 0a 20 5c 70 72 65 |ect#1{#2|}%. \pre|
|00002b70| 6e 74 72 79 40 40 78 7d | 0a 0a 5c 78 79 64 65 66 |ntry@@x}|..\xydef|
|00002b80| 40 5c 70 72 65 6e 74 72 | 79 40 40 6e 6f 72 6d 23 |@\prentr|y@@norm#|
|00002b90| 31 21 40 7b 5c 67 64 65 | 66 5c 6c 61 73 74 70 72 |1!@{\gde|f\lastpr|
|00002ba0| 65 6e 74 72 79 40 40 7b | 23 31 7d 25 0a 20 5c 44 |entry@@{|#1}%. \D|
|00002bb0| 4e 40 7b 5c 73 65 74 62 | 6f 78 5c 6c 61 73 74 6f |N@{\setb|ox\lasto|
|00002bc0| 62 6a 65 63 74 62 6f 78 | 40 3d 5c 6f 62 6a 65 63 |bjectbox|@=\objec|
|00002bd0| 74 7d 25 0a 20 5c 65 78 | 70 61 6e 64 61 66 74 65 |t}%. \ex|pandafte|
|00002be0| 72 5c 6e 65 78 74 40 5c | 65 6e 74 72 79 6d 6f 64 |r\next@\|entrymod|
|00002bf0| 69 66 69 65 72 73 40 7b | 5c 78 79 65 61 74 61 6c |ifiers@{|\xyeatal|
|00002c00| 6c 40 20 5c 65 76 65 72 | 79 65 6e 74 72 79 40 20 |l@ \ever|yentry@ |
|00002c10| 23 31 7d 25 0a 20 5c 70 | 72 65 6e 74 72 79 40 40 |#1}%. \p|rentry@@|
|00002c20| 78 7d 0a 0a 5c 78 79 64 | 65 66 40 5c 70 72 65 6e |x}..\xyd|ef@\pren|
|00002c30| 74 72 79 40 40 78 7b 25 | 0a 20 5c 65 64 65 66 5c |try@@x{%|. \edef\|
|00002c40| 6e 65 78 74 40 7b 7b 5c | 6e 6f 65 78 70 61 6e 64 |next@{{\|noexpand|
|00002c50| 5c 58 59 73 65 74 52 43 | 40 7b 5c 74 68 65 5c 72 |\XYsetRC|@{\the\r|
|00002c60| 6f 77 40 7d 7b 5c 55 70 | 6e 65 73 73 40 7d 7b 5c |ow@}{\Up|ness@}{\|
|00002c70| 74 68 65 5c 63 6f 6c 40 | 7d 7b 5c 4c 65 66 74 6e |the\col@|}{\Leftn|
|00002c80| 65 73 73 40 7d 25 0a 20 | 20 20 7b 5c 74 68 65 5c |ess@}%. | {\the\|
|00002c90| 4c 63 7d 7b 5c 74 68 65 | 5c 52 63 7d 7b 5c 74 68 |Lc}{\the|\Rc}{\th|
|00002ca0| 65 5c 44 63 7d 7b 5c 74 | 68 65 5c 55 63 7d 7b 5c |e\Dc}{\t|he\Uc}{\|
|00002cb0| 65 78 70 61 6e 64 61 66 | 74 65 72 5c 6e 6f 65 78 |expandaf|ter\noex|
|00002cc0| 70 61 6e 64 5c 74 68 65 | 5c 45 64 67 65 63 7d 7d |pand\the|\Edgec}}|
|00002cd0| 7d 25 0a 20 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |}%. \exp|andafter|
|00002ce0| 5c 61 64 64 71 40 5c 6e | 65 78 74 40 0a 20 5c 62 |\addq@\n|ext@. \b|
|00002cf0| 6f 78 5c 6c 61 73 74 6f | 62 6a 65 63 74 62 6f 78 |ox\lasto|bjectbox|
|00002d00| 40 7d 0a 5c 44 4f 43 4d | 4f 44 45 29 0a 0a 09 46 |@}.\DOCM|ODE)...F|
|00002d10| 69 6e 61 6c 6c 79 20 74 | 68 65 20 66 6f 6c 6c 6f |inally t|he follo|
|00002d20| 77 69 6e 67 20 65 6e 73 | 75 72 65 73 20 74 68 61 |wing ens|ures tha|
|00002d30| 74 20 74 68 65 20 6c 61 | 73 74 20 72 6f 77 20 69 |t the la|st row i|
|00002d40| 6e 20 74 68 65 20 64 69 | 61 67 72 61 6d 20 69 73 |n the di|agram is|
|00002d50| 0a 09 74 72 65 61 74 65 | 64 20 63 6f 72 72 65 63 |..treate|d correc|
|00002d60| 74 6c 79 3a 20 69 66 20 | 74 68 65 20 6c 61 73 74 |tly: if |the last|
|00002d70| 20 65 6e 74 72 79 20 77 | 61 73 20 61 6e 20 65 6d | entry w|as an em|
|00002d80| 70 74 79 20 72 6f 77 20 | 74 68 65 6e 20 77 65 20 |pty row |then we |
|00002d90| 69 67 6e 6f 72 65 0a 09 | 74 68 65 20 72 6f 77 20 |ignore..|the row |
|00002da0| 65 6e 74 69 72 65 6c 79 | 20 69 66 20 74 68 65 20 |entirely| if the |
|00002db0| 7c 5c 69 66 6f 6c 64 78 | 79 6d 61 74 72 69 78 40 ||\ifoldx|ymatrix@|
|00002dc0| 7c 20 73 77 69 74 63 68 | 20 69 73 20 73 65 74 20 || switch| is set |
|00002dd0| 6a 75 73 74 20 61 73 20 | 77 65 0a 09 69 67 6e 6f |just as |we..igno|
|00002de0| 72 65 20 7c 2a 7c 2d 65 | 6e 74 72 69 65 73 20 61 |re |*|-e|ntries a|
|00002df0| 62 6f 76 65 2e 0a 0a 5c | 44 4f 43 4d 4f 44 45 28 |bove...\|DOCMODE(|
|00002e00| 0a 5c 78 79 6e 65 77 40 | 7b 69 66 7d 5c 69 66 6f |.\xynew@|{if}\ifo|
|00002e10| 6c 64 78 79 6d 61 74 72 | 69 78 40 20 5c 6f 6c 64 |ldxymatr|ix@ \old|
|00002e20| 78 79 6d 61 74 72 69 78 | 40 66 61 6c 73 65 0a 0a |xymatrix|@false..|
|00002e30| 5c 78 79 64 65 66 40 5c | 70 72 65 6e 74 72 79 40 |\xydef@\|prentry@|
|00002e40| 40 40 7b 5c 72 65 6c 61 | 78 20 5c 6c 65 74 5c 6e |@@{\rela|x \let\n|
|00002e50| 65 78 74 40 3d 5c 70 72 | 65 6e 74 72 79 40 40 40 |ext@=\pr|entry@@@|
|00002e60| 69 0a 20 5c 69 66 6f 6c | 64 78 79 6d 61 74 72 69 |i. \ifol|dxymatri|
|00002e70| 78 40 20 5c 69 66 6e 75 | 6d 5c 63 6f 6c 40 3d 5c |x@ \ifnu|m\col@=\|
|00002e80| 40 6e 65 20 5c 69 66 78 | 5c 6c 61 73 74 70 72 65 |@ne \ifx|\lastpre|
|00002e90| 6e 74 72 79 40 40 5c 65 | 6d 70 74 79 0a 20 20 20 |ntry@@\e|mpty. |
|00002ea0| 20 5c 67 6c 6f 62 61 6c | 5c 61 64 76 61 6e 63 65 | \global|\advance|
|00002eb0| 5c 72 6f 77 40 5c 6d 40 | 6e 65 20 5c 6c 65 74 5c |\row@\m@|ne \let\|
|00002ec0| 6e 65 78 74 40 3d 5c 72 | 65 6c 61 78 20 5c 66 69 |next@=\r|elax \fi|
|00002ed0| 5c 66 69 5c 66 69 0a 20 | 5c 67 6c 6f 62 61 6c 5c |\fi\fi. |\global\|
|00002ee0| 6c 65 74 5c 6c 61 73 74 | 70 72 65 6e 74 72 79 40 |let\last|prentry@|
|00002ef0| 40 3d 5c 72 65 6c 61 78 | 20 5c 6e 65 78 74 40 7d |@=\relax| \next@}|
|00002f00| 0a 0a 5c 78 79 64 65 66 | 40 5c 70 72 65 6e 74 72 |..\xydef|@\prentr|
|00002f10| 79 40 40 40 69 7b 25 0a | 20 5c 69 66 6e 75 6d 5c |y@@@i{%.| \ifnum\|
|00002f20| 6d 61 78 63 6f 6c 40 3c | 5c 63 6f 6c 40 20 5c 78 |maxcol@<|\col@ \x|
|00002f30| 64 65 66 5c 6d 61 78 63 | 6f 6c 40 7b 5c 74 68 65 |def\maxc|ol@{\the|
|00002f40| 5c 63 6f 6c 40 7d 5c 78 | 64 65 66 5c 6d 61 78 63 |\col@}\x|def\maxc|
|00002f50| 6f 6c 72 6f 77 40 7b 5c | 74 68 65 5c 72 6f 77 40 |olrow@{\|the\row@|
|00002f60| 7d 5c 66 69 0a 20 5c 65 | 78 70 61 6e 64 61 66 74 |}\fi. \e|xpandaft|
|00002f70| 65 72 5c 78 64 65 66 5c | 63 73 6e 61 6d 65 20 6d |er\xdef\|csname m|
|00002f80| 61 78 63 6f 6c 40 5c 74 | 68 65 5c 72 6f 77 40 5c |axcol@\t|he\row@\|
|00002f90| 65 6e 64 63 73 6e 61 6d | 65 7b 5c 74 68 65 5c 63 |endcsnam|e{\the\c|
|00002fa0| 6f 6c 40 7d 7d 0a 5c 44 | 4f 43 4d 4f 44 45 29 0a |ol@}}.\D|OCMODE).|
|00002fb0| 0a 09 5c 54 4f 44 4f 3a | 20 41 6c 6c 6f 77 20 6e |..\TODO:| Allow n|
|00002fc0| 6f 6e 2d 64 65 66 61 75 | 6c 74 20 6f 62 6a 65 63 |on-defau|lt objec|
|00002fd0| 74 73 20 66 6f 72 20 70 | 61 72 74 69 63 75 6c 61 |ts for p|articula|
|00002fe0| 72 20 65 6e 74 72 69 65 | 73 2e 0a 0a 09 48 65 72 |r entrie|s....Her|
|00002ff0| 65 20 69 73 20 74 68 65 | 20 65 6e 63 6f 64 69 6e |e is the| encodin|
|00003000| 67 20 6f 66 20 74 68 65 | 20 61 62 6f 76 65 20 63 |g of the| above c|
|00003010| 6f 6d 70 75 74 61 74 69 | 6f 6e 2e 0a 0a 5c 44 4f |omputati|on...\DO|
|00003020| 43 4d 4f 44 45 28 0a 5c | 78 79 64 65 66 40 5c 58 |CMODE(.\|xydef@\X|
|00003030| 59 73 65 74 52 43 40 23 | 31 23 32 23 33 23 34 23 |YsetRC@#|1#2#3#4#|
|00003040| 35 23 36 23 37 23 38 23 | 39 7b 25 0a 20 5c 65 64 |5#6#7#8#|9{%. \ed|
|00003050| 65 66 5c 6e 65 78 74 69 | 69 40 7b 7b 5c 63 73 6e |ef\nexti|i@{{\csn|
|00003060| 61 6d 65 20 59 72 6f 77 | 40 23 31 5c 65 6e 64 63 |ame Yrow|@#1\endc|
|00003070| 73 6e 61 6d 65 7d 7b 5c | 63 73 6e 61 6d 65 20 48 |sname}{\|csname H|
|00003080| 72 6f 77 40 23 31 5c 65 | 6e 64 63 73 6e 61 6d 65 |row@#1\e|ndcsname|
|00003090| 7d 25 0a 20 20 7b 5c 63 | 73 6e 61 6d 65 20 58 63 |}%. {\c|sname Xc|
|000030a0| 6f 6c 40 23 33 5c 65 6e | 64 63 73 6e 61 6d 65 7d |ol@#3\en|dcsname}|
|000030b0| 7b 5c 63 73 6e 61 6d 65 | 20 57 63 6f 6c 40 23 33 |{\csname| Wcol@#3|
|000030c0| 5c 65 6e 64 63 73 6e 61 | 6d 65 7d 7d 25 0a 20 5c |\endcsna|me}}%. \|
|000030d0| 44 4e 40 23 23 31 23 23 | 32 23 23 33 23 23 34 7b |DN@##1##|2##3##4{|
|000030e0| 25 0a 20 20 5c 78 79 40 | 7b 53 45 54 55 50 20 22 |%. \xy@|{SETUP "|
|000030f0| 23 31 2c 23 33 22 7d 7b | 5c 6d 61 74 72 69 78 6f |#1,#3"}{|\matrixo|
|00003100| 72 69 67 69 6e 40 0a 20 | 20 20 5c 64 69 6d 65 6e |rigin@. | \dimen|
|00003110| 40 20 20 3d 2d 23 23 32 | 5c 64 69 6d 65 6e 40 20 |@ =-##2|\dimen@ |
|00003120| 20 3d 2e 35 5c 64 69 6d | 65 6e 40 20 20 20 5c 61 | =.5\dim|en@ \a|
|00003130| 64 76 61 6e 63 65 5c 64 | 69 6d 65 6e 40 20 20 23 |dvance\d|imen@ #|
|00003140| 23 31 5c 72 65 6c 61 78 | 0a 20 20 20 5c 64 69 6d |#1\relax|. \dim|
|00003150| 65 6e 40 69 69 3d 20 23 | 23 34 5c 64 69 6d 65 6e |en@ii= #|#4\dimen|
|00003160| 40 69 69 3d 2e 35 5c 64 | 69 6d 65 6e 40 69 69 20 |@ii=.5\d|imen@ii |
|00003170| 5c 61 64 76 61 6e 63 65 | 5c 64 69 6d 65 6e 40 69 |\advance|\dimen@i|
|00003180| 69 23 23 33 5c 72 65 6c | 61 78 0a 20 20 20 5c 61 |i##3\rel|ax. \a|
|00003190| 64 76 61 6e 63 65 5c 58 | 63 20 5c 78 79 6d 61 74 |dvance\X|c \xymat|
|000031a0| 72 69 78 63 6f 73 40 40 | 5c 64 69 6d 65 6e 40 69 |rixcos@@|\dimen@i|
|000031b0| 69 20 5c 61 64 76 61 6e | 63 65 5c 58 63 2d 5c 78 |i \advan|ce\Xc-\x|
|000031c0| 79 6d 61 74 72 69 78 73 | 69 6e 40 40 5c 64 69 6d |ymatrixs|in@@\dim|
|000031d0| 65 6e 40 0a 20 20 20 5c | 61 64 76 61 6e 63 65 5c |en@. \|advance\|
|000031e0| 59 63 20 5c 78 79 6d 61 | 74 72 69 78 73 69 6e 40 |Yc \xyma|trixsin@|
|000031f0| 40 5c 64 69 6d 65 6e 40 | 69 69 20 5c 61 64 76 61 |@\dimen@|ii \adva|
|00003200| 6e 63 65 5c 59 63 20 5c | 78 79 6d 61 74 72 69 78 |nce\Yc \|xymatrix|
|00003210| 63 6f 73 40 40 5c 64 69 | 6d 65 6e 40 0a 20 20 20 |cos@@\di|men@. |
|00003220| 5c 4c 63 3d 23 35 5c 52 | 63 3d 23 36 5c 44 63 3d |\Lc=#5\R|c=#6\Dc=|
|00003230| 23 37 5c 55 63 3d 23 38 | 5c 45 64 67 65 63 3d 7b |#7\Uc=#8|\Edgec={|
|00003240| 23 39 7d 25 0a 20 20 20 | 5c 69 64 66 72 6f 6d 63 |#9}%. |\idfromc|
|00003250| 40 7b 23 31 2c 23 33 7d | 7d 7d 25 0a 20 5c 65 78 |@{#1,#3}|}}%. \ex|
|00003260| 70 61 6e 64 61 66 74 65 | 72 5c 6e 65 78 74 40 5c |pandafte|r\next@\|
|00003270| 6e 65 78 74 69 69 40 7d | 0a 5c 44 4f 43 4d 4f 44 |nextii@}|.\DOCMOD|
|00003280| 45 29 0a 0a 5c 70 61 72 | 61 67 72 61 70 68 2a 7b |E)..\par|agraph*{|
|00003290| 4d 65 61 73 75 72 65 3a | 7d 0a 0a 09 54 61 6b 65 |Measure:|}...Take|
|000032a0| 20 74 68 65 20 63 72 65 | 61 74 65 64 20 62 6f 78 | the cre|ated box|
|000032b0| 38 20 61 70 61 72 74 20 | 74 6f 20 64 65 66 69 6e |8 apart |to defin|
|000032c0| 65 20 74 68 65 20 6d 61 | 63 72 6f 73 20 7c 5c 57 |e the ma|cros |\W|
|000032d0| 63 6f 6c 40 7c 22 63 6f | 6c 22 20 61 6e 64 0a 09 |col@|"co|l" and..|
|000032e0| 7c 5c 48 72 6f 77 40 7c | 22 72 6f 77 22 20 63 6f ||\Hrow@||"row" co|
|000032f0| 6e 74 61 69 6e 69 6e 67 | 20 74 68 65 20 77 69 64 |ntaining| the wid|
|00003300| 74 68 20 61 6e 64 20 68 | 65 69 67 68 74 20 6f 66 |th and h|eight of|
|00003310| 20 74 68 65 20 62 6f 75 | 6e 64 69 6e 67 20 62 6f | the bou|nding bo|
|00003320| 78 20 6f 66 0a 09 74 68 | 65 20 65 6e 74 72 69 65 |x of..th|e entrie|
|00003330| 73 20 69 6e 20 74 68 65 | 20 72 6f 77 2f 63 6f 6c |s in the| row/col|
|00003340| 75 6d 6e 2e 20 20 54 68 | 65 6e 20 73 65 74 20 7c |umn. Th|en set ||
|00003350| 5c 58 63 6f 6c 40 7c 22 | 63 6f 6c 22 20 61 6e 64 |\Xcol@|"|col" and|
|00003360| 0a 09 7c 5c 59 72 6f 77 | 40 7c 22 72 6f 77 22 20 |..|\Yrow|@|"row" |
|00003370| 74 6f 20 73 65 74 20 24 | 58 24 20 61 6e 64 20 24 |to set $|X$ and $|
|00003380| 59 24 20 6f 66 20 74 68 | 65 20 75 70 70 65 72 20 |Y$ of th|e upper |
|00003390| 6c 65 66 74 20 63 6f 72 | 6e 65 72 20 6f 66 20 74 |left cor|ner of t|
|000033a0| 68 65 0a 09 62 6f 75 6e | 64 69 6e 67 20 62 6f 78 |he..boun|ding box|
|000033b0| 20 6f 66 20 74 68 65 20 | 65 6e 74 72 79 20 61 74 | of the |entry at|
|000033c0| 20 22 72 6f 77 22 20 61 | 6e 64 20 22 63 6f 6c 22 | "row" a|nd "col"|
|000033d0| 2c 20 22 72 65 6c 61 74 | 69 76 65 20 74 6f 20 74 |, "relat|ive to t|
|000033e0| 68 65 20 63 65 6e 74 65 | 72 0a 09 6f 66 20 74 68 |he cente|r..of th|
|000033f0| 65 20 74 6f 70 20 6c 65 | 66 74 20 63 6f 72 6e 65 |e top le|ft corne|
|00003400| 72 20 65 6e 74 72 79 22 | 2c 20 5c 69 65 2c 20 7c |r entry"|, \ie, ||
|00003410| 22 31 2c 31 22 7c 3a 0a | 0a 5c 44 4f 43 4d 4f 44 |"1,1"|:.|.\DOCMOD|
|00003420| 45 28 0a 5c 78 79 64 65 | 66 40 5c 78 79 6d 61 74 |E(.\xyde|f@\xymat|
|00003430| 72 69 78 40 6d 65 61 73 | 75 72 65 69 74 7b 5c 78 |rix@meas|ureit{\x|
|00003440| 79 40 7b 4d 41 54 52 49 | 58 20 4d 45 41 53 55 52 |y@{MATRI|X MEASUR|
|00003450| 45 7d 7b 7d 25 0a 20 5c | 73 65 74 62 6f 78 36 3d |E}{}%. \|setbox6=|
|00003460| 5c 76 62 6f 78 7b 5c 75 | 6e 76 62 6f 78 38 20 5c |\vbox{\u|nvbox8 \|
|00003470| 67 6c 6f 62 61 6c 5c 72 | 6f 77 40 3d 5c 6d 61 78 |global\r|ow@=\max|
|00003480| 72 6f 77 40 0a 20 20 5c | 6c 6f 6f 70 40 20 5c 64 |row@. \|loop@ \d|
|00003490| 69 6d 65 6e 40 69 69 3d | 5c 6c 61 73 74 73 6b 69 |imen@ii=|\lastski|
|000034a0| 70 5c 75 6e 73 6b 69 70 | 20 5c 69 66 6e 75 6d 5c |p\unskip| \ifnum\|
|000034b0| 7a 40 3c 5c 72 6f 77 40 | 0a 20 20 20 5c 73 65 74 |z@<\row@|. \set|
|000034c0| 62 6f 78 34 3d 5c 6c 61 | 73 74 62 6f 78 20 5c 64 |box4=\la|stbox \d|
|000034d0| 69 6d 65 6e 40 3d 5c 64 | 70 34 20 5c 61 64 76 61 |imen@=\d|p4 \adva|
|000034e0| 6e 63 65 5c 64 69 6d 65 | 6e 40 5c 68 74 34 20 25 |nce\dime|n@\ht4 %|
|000034f0| 0a 20 20 20 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |. \exp|andafter|
|00003500| 5c 78 64 65 66 5c 63 73 | 6e 61 6d 65 20 48 72 6f |\xdef\cs|name Hro|
|00003510| 77 40 5c 74 68 65 5c 72 | 6f 77 40 5c 65 6e 64 63 |w@\the\r|ow@\endc|
|00003520| 73 6e 61 6d 65 7b 5c 74 | 68 65 5c 64 69 6d 65 6e |sname{\t|he\dimen|
|00003530| 40 7d 25 0a 20 20 20 5c | 69 66 6e 75 6d 5c 72 6f |@}%. \|ifnum\ro|
|00003540| 77 40 3d 5c 6d 61 78 63 | 6f 6c 72 6f 77 40 0a 20 |w@=\maxc|olrow@. |
|00003550| 20 20 20 5c 73 65 74 62 | 6f 78 32 3d 5c 68 62 6f | \setb|ox2=\hbo|
|00003560| 78 7b 5c 75 6e 68 62 6f | 78 34 20 25 0a 20 20 20 |x{\unhbo|x4 %. |
|00003570| 20 20 5c 67 6c 6f 62 61 | 6c 5c 63 6f 6c 40 3d 5c | \globa|l\col@=\|
|00003580| 6d 61 78 63 6f 6c 40 0a | 20 20 20 20 20 5c 6c 6f |maxcol@.| \lo|
|00003590| 6f 70 40 20 5c 64 69 6d | 65 6e 40 69 69 3d 5c 6c |op@ \dim|en@ii=\l|
|000035a0| 61 73 74 73 6b 69 70 5c | 75 6e 73 6b 69 70 20 5c |astskip\|unskip \|
|000035b0| 69 66 6e 75 6d 5c 7a 40 | 3c 5c 63 6f 6c 40 0a 20 |ifnum\z@|<\col@. |
|000035c0| 20 20 20 20 20 5c 73 65 | 74 62 6f 78 5c 7a 40 3d | \se|tbox\z@=|
|000035d0| 5c 6c 61 73 74 62 6f 78 | 0a 20 20 20 20 20 20 5c |\lastbox|. \|
|000035e0| 65 78 70 61 6e 64 61 66 | 74 65 72 5c 78 64 65 66 |expandaf|ter\xdef|
|000035f0| 5c 63 73 6e 61 6d 65 20 | 57 63 6f 6c 40 5c 74 68 |\csname |Wcol@\th|
|00003600| 65 5c 63 6f 6c 40 5c 65 | 6e 64 63 73 6e 61 6d 65 |e\col@\e|ndcsname|
|00003610| 7b 5c 74 68 65 5c 77 64 | 7a 40 7d 25 0a 20 20 20 |{\the\wd|z@}%. |
|00003620| 20 20 20 5c 67 6c 6f 62 | 61 6c 5c 61 64 76 61 6e | \glob|al\advan|
|00003630| 63 65 5c 63 6f 6c 40 5c | 6d 40 6e 65 0a 20 20 20 |ce\col@\|m@ne. |
|00003640| 20 20 5c 72 65 70 65 61 | 74 40 7d 5c 66 69 0a 20 | \repea|t@}\fi. |
|00003650| 20 20 20 5c 67 6c 6f 62 | 61 6c 5c 61 64 76 61 6e | \glob|al\advan|
|00003660| 63 65 5c 72 6f 77 40 5c | 6d 40 6e 65 0a 20 20 20 |ce\row@\|m@ne. |
|00003670| 5c 72 65 70 65 61 74 40 | 7d 25 0a 20 5c 63 6f 75 |\repeat@|}%. \cou|
|00003680| 6e 74 40 3d 5c 40 6e 65 | 0a 20 5c 64 69 6d 65 6e |nt@=\@ne|. \dimen|
|00003690| 40 3d 5c 63 73 6e 61 6d | 65 20 57 63 6f 6c 40 31 |@=\csnam|e Wcol@1|
|000036a0| 5c 65 6e 64 63 73 6e 61 | 6d 65 20 5c 64 69 6d 65 |\endcsna|me \dime|
|000036b0| 6e 40 3d 2d 2e 35 5c 64 | 69 6d 65 6e 40 0a 20 5c |n@=-.5\d|imen@. \|
|000036c0| 6c 6f 6f 70 40 0a 20 20 | 5c 65 78 70 61 6e 64 61 |loop@. |\expanda|
|000036d0| 66 74 65 72 5c 78 64 65 | 66 5c 63 73 6e 61 6d 65 |fter\xde|f\csname|
|000036e0| 20 58 63 6f 6c 40 5c 74 | 68 65 5c 63 6f 75 6e 74 | Xcol@\t|he\count|
|000036f0| 40 5c 65 6e 64 63 73 6e | 61 6d 65 7b 5c 74 68 65 |@\endcsn|ame{\the|
|00003700| 5c 64 69 6d 65 6e 40 7d | 25 0a 20 20 5c 61 64 76 |\dimen@}|%. \adv|
|00003710| 61 6e 63 65 5c 64 69 6d | 65 6e 40 5c 63 73 6e 61 |ance\dim|en@\csna|
|00003720| 6d 65 20 57 63 6f 6c 40 | 5c 74 68 65 5c 63 6f 75 |me Wcol@|\the\cou|
|00003730| 6e 74 40 5c 65 6e 64 63 | 73 6e 61 6d 65 0a 20 20 |nt@\endc|sname. |
|00003740| 5c 61 64 76 61 6e 63 65 | 5c 64 69 6d 65 6e 40 5c |\advance|\dimen@\|
|00003750| 78 79 6d 61 74 72 69 78 | 63 6f 6c 73 65 70 40 0a |xymatrix|colsep@.|
|00003760| 20 5c 69 66 6e 75 6d 5c | 63 6f 75 6e 74 40 3c 5c | \ifnum\|count@<\|
|00003770| 6d 61 78 63 6f 6c 40 20 | 20 5c 61 64 76 61 6e 63 |maxcol@ | \advanc|
|00003780| 65 5c 63 6f 75 6e 74 40 | 5c 40 6e 65 20 5c 72 65 |e\count@|\@ne \re|
|00003790| 70 65 61 74 40 0a 20 5c | 63 6f 75 6e 74 40 3d 5c |peat@. \|count@=\|
|000037a0| 40 6e 65 0a 20 5c 64 69 | 6d 65 6e 40 3d 5c 63 73 |@ne. \di|men@=\cs|
|000037b0| 6e 61 6d 65 20 48 72 6f | 77 40 31 5c 65 6e 64 63 |name Hro|w@1\endc|
|000037c0| 73 6e 61 6d 65 20 5c 64 | 69 6d 65 6e 40 3d 2e 35 |sname \d|imen@=.5|
|000037d0| 5c 64 69 6d 65 6e 40 0a | 20 5c 6c 6f 6f 70 40 0a |\dimen@.| \loop@.|
|000037e0| 20 20 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 78 | \expan|dafter\x|
|000037f0| 64 65 66 5c 63 73 6e 61 | 6d 65 20 59 72 6f 77 40 |def\csna|me Yrow@|
|00003800| 5c 74 68 65 5c 63 6f 75 | 6e 74 40 5c 65 6e 64 63 |\the\cou|nt@\endc|
|00003810| 73 6e 61 6d 65 7b 5c 74 | 68 65 5c 64 69 6d 65 6e |sname{\t|he\dimen|
|00003820| 40 7d 25 0a 20 20 5c 61 | 64 76 61 6e 63 65 5c 64 |@}%. \a|dvance\d|
|00003830| 69 6d 65 6e 40 2d 5c 63 | 73 6e 61 6d 65 20 48 72 |imen@-\c|sname Hr|
|00003840| 6f 77 40 5c 74 68 65 5c | 63 6f 75 6e 74 40 5c 65 |ow@\the\|count@\e|
|00003850| 6e 64 63 73 6e 61 6d 65 | 0a 20 20 5c 61 64 76 61 |ndcsname|. \adva|
|00003860| 6e 63 65 5c 64 69 6d 65 | 6e 40 2d 5c 78 79 6d 61 |nce\dime|n@-\xyma|
|00003870| 74 72 69 78 72 6f 77 73 | 65 70 40 0a 20 5c 69 66 |trixrows|ep@. \if|
|00003880| 6e 75 6d 5c 63 6f 75 6e | 74 40 3c 5c 6d 61 78 72 |num\coun|t@<\maxr|
|00003890| 6f 77 40 20 20 5c 61 64 | 76 61 6e 63 65 5c 63 6f |ow@ \ad|vance\co|
|000038a0| 75 6e 74 40 5c 40 6e 65 | 20 5c 72 65 70 65 61 74 |unt@\@ne| \repeat|
|000038b0| 40 7d 0a 5c 44 4f 43 4d | 4f 44 45 29 0a 0a 09 5c |@}.\DOCM|ODE)...\|
|000038c0| 54 4f 44 4f 3a 20 41 6c | 6c 6f 77 20 6e 6f 6e 2d |TODO: Al|low non-|
|000038d0| 64 65 66 61 75 6c 74 20 | 73 70 61 63 69 6e 67 20 |default |spacing |
|000038e0| 62 65 74 77 65 65 6e 20 | 70 61 72 74 69 63 75 6c |between |particul|
|000038f0| 61 72 20 72 6f 77 73 2f | 63 6f 6c 75 6d 6e 73 20 |ar rows/|columns |
|00003900| 61 73 0a 09 77 65 6c 6c | 20 61 73 20 64 69 66 66 |as..well| as diff|
|00003910| 65 72 65 6e 74 20 6a 75 | 73 74 69 66 69 63 61 74 |erent ju|stificat|
|00003920| 69 6f 6e 20 6f 66 20 74 | 68 65 20 65 6e 74 69 72 |ion of t|he entir|
|00003930| 65 20 6d 61 74 72 69 78 | 5c 64 6f 74 73 0a 0a 5c |e matrix|\dots..\|
|00003940| 70 61 72 61 67 72 61 70 | 68 2a 7b 53 65 74 75 70 |paragrap|h*{Setup|
|00003950| 3a 7d 0a 0a 09 52 75 6e | 73 20 74 68 65 20 71 75 |:}...Run|s the qu|
|00003960| 65 75 65 20 6f 66 20 63 | 6f 6d 6d 61 6e 64 73 20 |eue of c|ommands |
|00003970| 64 65 66 69 6e 65 64 20 | 64 75 72 69 6e 67 20 70 |defined |during p|
|00003980| 72 65 74 79 70 65 73 65 | 74 74 69 6e 67 20 74 6f |retypese|tting to|
|00003990| 20 73 65 74 20 75 70 0a | 09 74 68 65 20 6c 6f 63 | set up.|.the loc|
|000039a0| 61 74 69 6f 6e 73 20 6f | 66 20 61 6c 6c 20 70 6f |ations o|f all po|
|000039b0| 73 69 74 69 6f 6e 73 20 | 77 69 74 68 20 74 68 65 |sitions |with the|
|000039c0| 20 64 61 74 61 20 6f 62 | 74 61 69 6e 65 64 20 62 | data ob|tained b|
|000039d0| 79 20 6d 65 61 73 75 72 | 69 6e 67 2e 0a 09 54 68 |y measur|ing...Th|
|000039e0| 65 6e 20 63 6c 65 61 72 | 20 74 68 65 20 71 75 65 |en clear| the que|
|000039f0| 75 65 2e 0a 0a 5c 44 4f | 43 4d 4f 44 45 28 0a 5c |ue...\DO|CMODE(.\|
|00003a00| 78 79 64 65 66 40 5c 78 | 79 6d 61 74 72 69 78 40 |xydef@\x|ymatrix@|
|00003a10| 73 65 74 75 70 7b 5c 78 | 79 40 7b 4d 41 54 52 49 |setup{\x|y@{MATRI|
|00003a20| 58 20 53 45 54 55 50 7d | 7b 7d 25 0a 25 0a 25 5c |X SETUP}|{}%.%.%\|
|00003a30| 65 78 70 61 6e 64 61 66 | 74 65 72 5c 44 4e 40 5c |expandaf|ter\DN@\|
|00003a40| 65 78 70 61 6e 64 61 66 | 74 65 72 7b 5c 74 68 65 |expandaf|ter{\the|
|00003a50| 5c 71 75 65 75 65 40 7d | 5c 57 40 7b 20 53 45 54 |\queue@}|\W@{ SET|
|00003a60| 55 50 51 3d 7b 5c 63 6f | 64 65 6f 66 5c 6e 65 78 |UPQ={\co|deof\nex|
|00003a70| 74 40 7d 7d 25 0a 25 0a | 20 5c 74 68 65 5c 71 75 |t@}}%.%.| \the\qu|
|00003a80| 65 75 65 40 20 5c 67 6c | 6f 62 61 6c 5c 71 75 65 |eue@ \gl|obal\que|
|00003a90| 75 65 40 3d 7b 7d 7d 0a | 5c 44 4f 43 4d 4f 44 45 |ue@={}}.|\DOCMODE|
|00003aa0| 29 0a 0a 5c 70 61 72 61 | 67 72 61 70 68 2a 7b 54 |)..\para|graph*{T|
|00003ab0| 79 70 65 73 65 74 3a 7d | 0a 0a 09 52 65 74 79 70 |ypeset:}|...Retyp|
|00003ac0| 65 73 65 74 20 74 68 65 | 20 65 6e 74 69 72 65 20 |eset the| entire |
|00003ad0| 64 69 61 67 72 61 6d 20 | 75 73 69 6e 67 20 61 20 |diagram |using a |
|00003ae0| 68 61 63 6b 65 64 20 68 | 61 6c 69 67 6e 3a 20 69 |hacked h|align: i|
|00003af0| 74 73 20 74 65 6d 70 6c | 61 74 65 0a 09 74 79 70 |ts templ|ate..typ|
|00003b00| 65 73 65 74 73 20 65 61 | 63 68 20 65 6e 74 72 79 |esets ea|ch entry|
|00003b10| 20 61 73 0a 24 24 0a 20 | 7c 5c 50 4f 53 7c 5c 2c | as.$$. ||\POS|\,|
|00003b20| 7c 22 7c 22 72 6f 77 22 | 7c 2c 7c 22 63 6f 6c 22 ||"|"row"||,|"col"|
|00003b30| 7c 22 7c 5c 2c 7c 2a 7c | 5c 2c 22 6f 62 6a 65 63 ||"|\,|*||\,"objec|
|00003b40| 74 22 5c 2c 7c 5c 72 65 | 6c 61 78 7c 5c 2c 22 5c |t"\,|\re|lax|\,"\|
|00003b50| 58 59 2d 63 6f 6d 6d 61 | 6e 64 73 22 7c 5c 72 65 |XY-comma|nds"|\re|
|00003b60| 6c 61 78 7c 0a 24 24 0a | 09 77 68 65 72 65 20 22 |lax|.$$.|.where "|
|00003b70| 6f 62 6a 65 63 74 22 20 | 69 73 20 74 68 65 20 63 |object" |is the c|
|00003b80| 6f 6e 74 65 6e 74 73 20 | 6f 66 20 74 68 65 20 65 |ontents |of the e|
|00003b90| 6e 74 72 79 20 74 72 61 | 6e 73 6c 61 74 65 64 20 |ntry tra|nslated |
|00003ba0| 69 6e 74 6f 20 5c 58 59 | 2d 70 69 63 0a 09 3c 6f |into \XY|-pic..<o|
|00003bb0| 62 6a 65 63 74 3e 20 66 | 6f 72 6d 20 61 6e 64 20 |bject> f|orm and |
|00003bc0| 22 5c 58 59 2d 63 6f 6d | 6d 61 6e 64 73 22 20 65 |"\XY-com|mands" e|
|00003bd0| 6e 74 61 69 6c 73 20 74 | 68 65 20 63 6f 6d 6d 61 |ntails t|he comma|
|00003be0| 6e 64 73 20 75 73 65 64 | 20 69 6e 20 74 68 69 73 |nds used| in this|
|00003bf0| 0a 09 70 61 72 74 69 63 | 75 6c 61 72 20 65 6e 74 |..partic|ular ent|
|00003c00| 72 79 2e 0a 0a 5c 44 4f | 43 4d 4f 44 45 28 0a 5c |ry...\DO|CMODE(.\|
|00003c10| 78 79 64 65 66 40 5c 78 | 79 6d 61 74 72 69 78 40 |xydef@\x|ymatrix@|
|00003c20| 74 79 70 65 73 65 74 23 | 31 7b 25 0a 25 0a 20 5c |typeset#|1{%.%. \|
|00003c30| 78 79 40 7b 4d 41 54 52 | 49 58 20 54 59 50 45 53 |xy@{MATR|IX TYPES|
|00003c40| 45 54 7d 7b 7d 25 0a 20 | 5c 63 6c 65 61 72 71 40 |ET}{}%. |\clearq@|
|00003c50| 0a 25 0a 25 20 5c 78 79 | 40 7b 4d 41 54 52 49 58 |.%.% \xy|@{MATRIX|
|00003c60| 20 54 59 50 45 53 45 54 | 7d 7b 5c 78 64 65 66 5c | TYPESET|}{\xdef\|
|00003c70| 65 6e 74 72 79 40 6d 69 | 6e 6d 61 78 7b 5c 58 6d |entry@mi|nmax{\Xm|
|00003c80| 69 6e 3d 5c 74 68 65 5c | 58 6d 69 6e 20 5c 58 6d |in=\the\|Xmin \Xm|
|00003c90| 61 78 3d 5c 74 68 65 5c | 58 6d 61 78 0a 25 20 20 |ax=\the\|Xmax.% |
|00003ca0| 20 5c 59 6d 69 6e 3d 5c | 74 68 65 5c 59 6d 69 6e | \Ymin=\|the\Ymin|
|00003cb0| 20 5c 59 6d 61 78 3d 5c | 74 68 65 5c 59 6d 61 78 | \Ymax=\|the\Ymax|
|00003cc0| 7d 7d 25 0a 25 0a 20 5c | 68 62 6f 78 7b 5c 76 74 |}}%.%. \|hbox{\vt|
|00003cd0| 6f 70 7b 5c 78 79 71 61 | 6c 6c 40 0a 25 0a 20 20 |op{\xyqa|ll@.%. |
|00003ce0| 20 5c 78 79 40 40 7b 5c | 69 66 78 5c 78 79 6d 61 | \xy@@{\|ifx\xyma|
|00003cf0| 74 72 69 78 73 61 76 65 | 64 43 4f 4f 52 44 40 5c |trixsave|dCOORD@\|
|00003d00| 72 65 6c 61 78 0a 20 20 | 20 20 20 5c 65 6e 74 65 |relax. | \ente|
|00003d10| 72 40 7b 5c 6e 6f 65 78 | 70 61 6e 64 5c 6c 65 74 |r@{\noex|pand\let|
|00003d20| 5c 6e 6f 65 78 70 61 6e | 64 5c 43 4f 4f 52 44 40 |\noexpan|d\COORD@|
|00003d30| 5c 6e 6f 65 78 70 61 6e | 64 5c 78 79 6d 61 74 72 |\noexpan|d\xymatr|
|00003d40| 69 78 73 61 76 65 64 43 | 4f 4f 52 44 40 7d 25 0a |ixsavedC|OORD@}%.|
|00003d50| 20 20 20 20 20 5c 6c 65 | 74 5c 78 79 6d 61 74 72 | \le|t\xymatr|
|00003d60| 69 78 73 61 76 65 64 43 | 4f 4f 52 44 40 3d 5c 43 |ixsavedC|OORD@=\C|
|00003d70| 4f 4f 52 44 40 20 5c 6c | 65 74 5c 43 4f 4f 52 44 |OORD@ \l|et\COORD|
|00003d80| 40 3d 5c 78 79 6d 61 74 | 72 69 78 43 4f 4f 52 44 |@=\xymat|rixCOORD|
|00003d90| 40 0a 20 20 20 20 5c 65 | 6c 73 65 20 5c 65 6e 74 |@. \e|lse \ent|
|00003da0| 65 72 40 7b 7d 5c 66 69 | 7d 25 0a 25 0a 20 20 20 |er@{}\fi|}%.%. |
|00003db0| 5c 69 66 78 5c 78 79 6d | 61 74 72 69 78 73 61 76 |\ifx\xym|atrixsav|
|00003dc0| 65 64 43 4f 4f 52 44 40 | 5c 72 65 6c 61 78 20 5c |edCOORD@|\relax \|
|00003dd0| 6c 65 74 5c 78 79 6d 61 | 74 72 69 78 73 61 76 65 |let\xyma|trixsave|
|00003de0| 64 43 4f 4f 52 44 40 3d | 5c 43 4f 4f 52 44 40 20 |dCOORD@=|\COORD@ |
|00003df0| 5c 66 69 0a 20 20 20 5c | 6c 65 74 5c 43 4f 4f 52 |\fi. \|let\COOR|
|00003e00| 44 40 3d 5c 78 79 6d 61 | 74 72 69 78 43 4f 4f 52 |D@=\xyma|trixCOOR|
|00003e10| 44 40 0a 20 20 20 5c 6b | 65 72 6e 5c 7a 40 20 5c |D@. \k|ern\z@ \|
|00003e20| 67 6c 6f 62 61 6c 5c 72 | 6f 77 40 3d 5c 7a 40 0a |global\r|ow@=\z@.|
|00003e30| 20 20 20 5c 65 76 65 72 | 79 63 72 7b 7d 5c 6c 65 | \ever|ycr{}\le|
|00003e40| 74 5c 5c 3d 5c 63 72 20 | 5c 74 61 62 73 6b 69 70 |t\\=\cr |\tabskip|
|00003e50| 3d 5c 7a 40 20 5c 6f 66 | 66 69 6e 74 65 72 6c 69 |=\z@ \of|finterli|
|00003e60| 6e 65 73 6b 69 70 0a 20 | 20 20 5c 68 61 6c 69 67 |neskip. | \halig|
|00003e70| 6e 7b 5c 65 6e 74 72 79 | 40 23 23 21 40 26 26 5c |n{\entry|@##!@&&\|
|00003e80| 65 6e 74 72 79 40 40 23 | 23 21 40 5c 63 72 23 31 |entry@@#|#!@\cr#1|
|00003e90| 5c 63 72 63 72 7d 25 0a | 25 0a 20 20 20 5c 78 79 |\crcr}%.|%. \xy|
|00003ea0| 40 40 7b 5c 6c 65 61 76 | 65 40 7d 25 0a 25 0a 20 |@@{\leav|e@}%.%. |
|00003eb0| 7d 7d 25 0a 25 0a 20 5c | 66 69 6e 69 73 68 71 40 |}}%.%. \|finishq@|
|00003ec0| 0a 25 0a 25 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |.%.%\exp|andafter|
|00003ed0| 5c 44 4e 40 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |\DN@\exp|andafter|
|00003ee0| 7b 5c 74 68 65 5c 71 75 | 65 75 65 40 7d 5c 57 40 |{\the\qu|eue@}\W@|
|00003ef0| 7b 20 52 55 4e 51 3d 7b | 5c 63 6f 64 65 6f 66 5c |{ RUNQ={|\codeof\|
|00003f00| 6e 65 78 74 40 7d 7d 25 | 0a 25 0a 20 5c 65 78 70 |next@}}%|.%. \exp|
|00003f10| 61 6e 64 61 66 74 65 72 | 5c 78 79 40 40 5c 65 78 |andafter|\xy@@\ex|
|00003f20| 70 61 6e 64 61 66 74 65 | 72 7b 5c 74 68 65 5c 71 |pandafte|r{\the\q|
|00003f30| 75 65 75 65 40 7d 5c 67 | 6c 6f 62 61 6c 5c 71 75 |ueue@}\g|lobal\qu|
|00003f40| 65 75 65 40 3d 7b 7d 25 | 0a 25 0a 25 5c 78 79 40 |eue@={}%|.%.%\xy@|
|00003f50| 40 5c 65 6e 74 72 79 40 | 6d 69 6e 6d 61 78 0a 7d |@\entry@|minmax.}|
|00003f60| 0a 5c 44 4f 43 4d 4f 44 | 45 29 0a 0a 09 48 65 72 |.\DOCMOD|E)...Her|
|00003f70| 65 20 61 72 65 20 74 68 | 65 20 74 65 6d 70 6c 61 |e are th|e templa|
|00003f80| 74 65 20 65 78 65 63 75 | 74 69 6f 6e 20 6d 61 63 |te execu|tion mac|
|00003f90| 72 6f 73 3a 20 57 65 20 | 72 65 73 65 74 20 74 68 |ros: We |reset th|
|00003fa0| 65 20 7c 5c 71 75 65 75 | 65 40 7c 20 66 6f 72 0a |e |\queu|e@| for.|
|00003fb0| 09 65 61 63 68 20 65 6e | 74 72 79 2c 20 7c 5c 64 |.each en|try, |\d|
|00003fc0| 72 6f 70 7c 20 69 74 20 | 74 68 65 20 75 73 75 61 |rop| it |the usua|
|00003fd0| 6c 20 77 61 79 20 65 78 | 63 65 70 74 20 66 69 72 |l way ex|cept fir|
|00003fe0| 73 74 20 61 6c 6c 20 5c | 58 59 2d 63 6f 6d 6d 61 |st all \|XY-comma|
|00003ff0| 6e 64 73 0a 09 61 72 65 | 20 60 72 65 64 69 72 65 |nds..are| `redire|
|00004000| 63 74 65 64 27 20 74 6f | 20 74 68 65 20 71 75 65 |cted' to| the que|
|00004010| 75 65 2c 20 61 6e 64 20 | 74 68 65 6e 20 74 79 70 |ue, and |then typ|
|00004020| 65 73 65 74 20 74 68 65 | 6d 2e 20 20 57 65 20 70 |eset the|m. We p|
|00004030| 61 73 73 20 74 68 65 0a | 09 6d 69 6e 2f 6d 61 78 |ass the.|.min/max|
|00004040| 20 6f 66 20 74 68 65 20 | 70 69 63 74 75 72 65 20 | of the |picture |
|00004050| 66 72 6f 6d 20 6f 6e 65 | 20 65 6e 74 72 79 20 74 |from one| entry t|
|00004060| 6f 20 74 68 65 20 6e 65 | 78 74 20 75 73 69 6e 67 |o the ne|xt using|
|00004070| 20 61 20 67 6c 6f 62 61 | 6c 0a 09 6d 61 63 72 6f | a globa|l..macro|
|00004080| 20 7c 5c 65 6e 74 72 79 | 40 6d 69 6e 6d 61 78 7c | |\entry|@minmax||
|00004090| 2e 0a 0a 5c 44 4f 43 4d | 4f 44 45 28 0a 5c 78 79 |...\DOCM|ODE(.\xy|
|000040a0| 64 65 66 40 5c 65 6e 74 | 72 79 40 7b 5c 72 65 6c |def@\ent|ry@{\rel|
|000040b0| 61 78 20 5c 67 6c 6f 62 | 61 6c 5c 61 64 76 61 6e |ax \glob|al\advan|
|000040c0| 63 65 5c 72 6f 77 40 5c | 40 6e 65 20 5c 67 6c 6f |ce\row@\|@ne \glo|
|000040d0| 62 61 6c 5c 63 6f 6c 40 | 3d 5c 7a 40 20 5c 65 6e |bal\col@|=\z@ \en|
|000040e0| 74 72 79 40 40 7d 0a 0a | 5c 78 79 6c 65 74 40 5c |try@@}..|\xylet@\|
|000040f0| 65 6e 74 72 79 40 6d 69 | 6e 6d 61 78 3d 5c 65 6d |entry@mi|nmax=\em|
|00004100| 70 74 79 0a 5c 44 4f 43 | 4d 4f 44 45 0a 0a 09 41 |pty.\DOC|MODE...A|
|00004110| 67 61 69 6e 20 73 6f 6d | 65 20 70 61 72 73 69 6e |gain som|e parsin|
|00004120| 67 20 64 65 74 65 72 6d | 69 6e 65 73 20 77 68 65 |g determ|ines whe|
|00004130| 74 68 65 72 20 74 68 69 | 73 20 69 73 20 61 20 7c |ther thi|s is a ||
|00004140| 2a 7c 2d 6f 62 6a 65 63 | 74 20 6f 72 20 61 0a 09 |*|-objec|t or a..|
|00004150| 6e 6f 72 6d 61 6c 20 6f | 62 6a 65 63 74 3a 0a 0a |normal o|bject:..|
|00004160| 5c 44 4f 43 4d 4f 44 45 | 28 0a 5c 78 79 64 65 66 |\DOCMODE|(.\xydef|
|00004170| 40 5c 65 6e 74 72 79 40 | 40 7b 5c 67 6c 6f 62 61 |@\entry@|@{\globa|
|00004180| 6c 5c 61 64 76 61 6e 63 | 65 5c 63 6f 6c 40 5c 40 |l\advanc|e\col@\@|
|00004190| 6e 65 0a 20 5c 44 4e 40 | 23 23 31 2c 23 23 32 40 |ne. \DN@|##1,##2@|
|000041a0| 7b 5c 78 79 40 7b 45 4e | 54 52 59 20 22 23 23 31 |{\xy@{EN|TRY "##1|
|000041b0| 2c 23 23 32 22 7d 7b 5c | 72 6f 77 40 3d 23 23 31 |,##2"}{\|row@=##1|
|000041c0| 20 5c 63 6f 6c 40 3d 23 | 23 32 5c 72 65 6c 61 78 | \col@=#|#2\relax|
|000041d0| 0a 20 20 20 5c 65 6e 74 | 72 79 40 6d 69 6e 6d 61 |. \ent|ry@minma|
|000041e0| 78 20 5c 63 66 72 6f 6d | 69 64 40 7b 23 23 31 2c |x \cfrom|id@{##1,|
|000041f0| 23 23 32 7d 5c 70 66 72 | 6f 6d 63 40 7d 7d 25 0a |##2}\pfr|omc@}}%.|
|00004200| 20 5c 65 64 65 66 5c 6e | 65 78 74 69 69 40 7b 5c | \edef\n|extii@{\|
|00004210| 74 68 65 5c 72 6f 77 40 | 2c 5c 74 68 65 5c 63 6f |the\row@|,\the\co|
|00004220| 6c 40 20 40 7d 5c 65 78 | 70 61 6e 64 61 66 74 65 |l@ @}\ex|pandafte|
|00004230| 72 5c 6e 65 78 74 40 5c | 6e 65 78 74 69 69 40 0a |r\next@\|nextii@.|
|00004240| 20 5c 78 79 46 4e 40 5c | 65 6e 74 72 79 40 40 69 | \xyFN@\|entry@@i|
|00004250| 7d 0a 0a 5c 78 79 64 65 | 66 40 5c 65 6e 74 72 79 |}..\xyde|f@\entry|
|00004260| 40 40 69 7b 5c 6c 65 74 | 5c 6e 65 78 74 40 3d 5c |@@i{\let|\next@=\|
|00004270| 65 6e 74 72 79 40 40 6e | 6f 72 6d 0a 20 5c 69 66 |entry@@n|orm. \if|
|00004280| 6f 6c 64 78 79 6d 61 74 | 72 69 78 40 5c 65 6c 73 |oldxymat|rix@\els|
|00004290| 65 20 5c 69 66 78 20 2a | 5c 6e 65 78 74 20 5c 44 |e \ifx *|\next \D|
|000042a0| 4e 40 2a 23 23 31 23 23 | 7b 5c 65 6e 74 72 79 40 |N@*##1##|{\entry@|
|000042b0| 40 73 74 61 72 7b 23 23 | 31 7d 7d 5c 66 69 20 5c |@star{##|1}}\fi \|
|000042c0| 66 69 0a 20 5c 6e 65 78 | 74 40 7d 0a 0a 5c 78 79 |fi. \nex|t@}..\xy|
|000042d0| 64 65 66 40 5c 65 6e 74 | 72 79 40 40 73 74 61 72 |def@\ent|ry@@star|
|000042e0| 23 31 23 32 23 33 21 40 | 7b 25 0a 20 5c 78 79 40 |#1#2#3!@|{%. \xy@|
|000042f0| 40 69 78 40 7b 7b 23 31 | 7d 7b 23 32 7d 7d 5c 78 |@ix@{{#1|}{#2}}\x|
|00004300| 79 40 40 7b 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |y@@{\exp|andafter|
|00004310| 5c 64 72 6f 70 65 6e 74 | 72 79 40 5c 74 68 65 5c |\dropent|ry@\the\|
|00004320| 74 6f 6b 73 39 7d 25 0a | 20 5c 73 65 74 62 6f 78 |toks9}%.| \setbox|
|00004330| 7a 40 68 7b 5c 78 79 71 | 61 6c 6c 40 0a 20 20 5c |z@h{\xyq|all@. \|
|00004340| 69 66 78 5c 78 79 6d 61 | 74 72 69 78 73 61 76 65 |ifx\xyma|trixsave|
|00004350| 64 43 4f 4f 52 44 40 5c | 72 65 6c 61 78 20 5c 6c |dCOORD@\|relax \l|
|00004360| 65 74 5c 78 79 6d 61 74 | 72 69 78 73 61 76 65 64 |et\xymat|rixsaved|
|00004370| 43 4f 4f 52 44 40 3d 5c | 43 4f 4f 52 44 40 20 5c |COORD@=\|COORD@ \|
|00004380| 66 69 0a 20 20 5c 6c 65 | 74 5c 43 4f 4f 52 44 40 |fi. \le|t\COORD@|
|00004390| 3d 5c 78 79 6d 61 74 72 | 69 78 43 4f 4f 52 44 40 |=\xymatr|ixCOORD@|
|000043a0| 20 5c 65 76 65 72 79 65 | 6e 74 72 79 40 20 23 33 | \everye|ntry@ #3|
|000043b0| 7d 25 0a 20 5c 73 65 74 | 62 6f 78 5c 7a 40 3d 5c |}%. \set|box\z@=\|
|000043c0| 63 6f 70 79 5c 76 6f 69 | 64 62 40 78 7d 0a 0a 5c |copy\voi|db@x}..\|
|000043d0| 78 79 64 65 66 40 5c 65 | 6e 74 72 79 40 40 6e 6f |xydef@\e|ntry@@no|
|000043e0| 72 6d 23 31 21 40 7b 25 | 0a 20 5c 44 4e 40 23 23 |rm#1!@{%|. \DN@##|
|000043f0| 31 7b 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 78 |1{\expan|dafter\x|
|00004400| 79 40 40 69 78 40 0a 20 | 20 5c 65 78 70 61 6e 64 |y@@ix@. | \expand|
|00004410| 61 66 74 65 72 7b 5c 65 | 78 70 61 6e 64 61 66 74 |after{\e|xpandaft|
|00004420| 65 72 7b 5c 65 6e 74 72 | 79 6d 6f 64 69 66 69 65 |er{\entr|ymodifie|
|00004430| 72 73 40 7d 7b 23 23 31 | 7d 7d 7d 25 0a 20 5c 65 |rs@}{##1|}}}%. \e|
|00004440| 78 70 61 6e 64 61 66 74 | 65 72 5c 6e 65 78 74 40 |xpandaft|er\next@|
|00004450| 5c 65 78 70 61 6e 64 61 | 66 74 65 72 7b 5c 65 76 |\expanda|fter{\ev|
|00004460| 65 72 79 65 6e 74 72 79 | 40 23 31 7d 25 0a 20 5c |eryentry|@#1}%. \|
|00004470| 78 79 40 40 7b 5c 65 78 | 70 61 6e 64 61 66 74 65 |xy@@{\ex|pandafte|
|00004480| 72 5c 64 72 6f 70 65 6e | 74 72 79 40 5c 74 68 65 |r\dropen|try@\the|
|00004490| 5c 74 6f 6b 73 39 7d 25 | 0a 20 5c 73 65 74 62 6f |\toks9}%|. \setbo|
|000044a0| 78 5c 7a 40 3d 5c 65 78 | 70 61 6e 64 61 66 74 65 |x\z@=\ex|pandafte|
|000044b0| 72 5c 6f 62 6a 65 63 74 | 5c 65 6e 74 72 79 6d 6f |r\object|\entrymo|
|000044c0| 64 69 66 69 65 72 73 40 | 7b 5c 78 79 71 61 6c 6c |difiers@|{\xyqall|
|000044d0| 40 0a 20 20 5c 69 66 78 | 5c 78 79 6d 61 74 72 69 |@. \ifx|\xymatri|
|000044e0| 78 73 61 76 65 64 43 4f | 4f 52 44 40 5c 72 65 6c |xsavedCO|ORD@\rel|
|000044f0| 61 78 20 5c 6c 65 74 5c | 78 79 6d 61 74 72 69 78 |ax \let\|xymatrix|
|00004500| 73 61 76 65 64 43 4f 4f | 52 44 40 3d 5c 43 4f 4f |savedCOO|RD@=\COO|
|00004510| 52 44 40 20 5c 66 69 0a | 20 20 5c 6c 65 74 5c 43 |RD@ \fi.| \let\C|
|00004520| 4f 4f 52 44 40 3d 5c 78 | 79 6d 61 74 72 69 78 43 |OORD@=\x|ymatrixC|
|00004530| 4f 4f 52 44 40 20 5c 65 | 76 65 72 79 65 6e 74 72 |OORD@ \e|veryentr|
|00004540| 79 40 20 23 31 7d 25 0a | 20 5c 73 65 74 62 6f 78 |y@ #1}%.| \setbox|
|00004550| 5c 7a 40 3d 5c 63 6f 70 | 79 5c 76 6f 69 64 62 40 |\z@=\cop|y\voidb@|
|00004560| 78 7d 0a 5c 44 4f 43 4d | 4f 44 45 29 0a 0a 09 44 |x}.\DOCM|ODE)...D|
|00004570| 72 6f 70 70 69 6e 67 20 | 74 68 65 20 65 6e 74 72 |ropping |the entr|
|00004580| 79 20 69 73 20 6a 75 73 | 74 20 72 65 74 79 70 65 |y is jus|t retype|
|00004590| 73 65 74 74 69 6e 67 20 | 69 74 20 61 74 20 74 68 |setting |it at th|
|000045a0| 65 20 72 69 67 68 74 20 | 6c 6f 63 61 74 69 6f 6e |e right |location|
|000045b0| 0a 09 61 67 61 69 6e 20 | 69 67 6e 6f 72 69 6e 67 |..again |ignoring|
|000045c0| 20 74 68 65 20 5c 58 59 | 2d 73 74 75 66 66 3a 0a | the \XY|-stuff:.|
|000045d0| 0a 5c 44 4f 43 4d 4f 44 | 45 28 0a 5c 78 79 64 65 |.\DOCMOD|E(.\xyde|
|000045e0| 66 40 5c 64 72 6f 70 65 | 6e 74 72 79 40 23 31 23 |f@\drope|ntry@#1#|
|000045f0| 32 7b 5c 64 72 6f 70 40 | 7b 23 31 7d 7b 5c 78 79 |2{\drop@|{#1}{\xy|
|00004600| 65 61 74 61 6c 6c 40 0a | 20 20 5c 69 66 78 5c 78 |eatall@.| \ifx\x|
|00004610| 79 6d 61 74 72 69 78 73 | 61 76 65 64 43 4f 4f 52 |ymatrixs|avedCOOR|
|00004620| 44 40 5c 72 65 6c 61 78 | 20 5c 6c 65 74 5c 78 79 |D@\relax| \let\xy|
|00004630| 6d 61 74 72 69 78 73 61 | 76 65 64 43 4f 4f 52 44 |matrixsa|vedCOORD|
|00004640| 40 3d 5c 43 4f 4f 52 44 | 40 20 5c 66 69 0a 20 20 |@=\COORD|@ \fi. |
|00004650| 5c 6c 65 74 5c 43 4f 4f | 52 44 40 3d 5c 78 79 6d |\let\COO|RD@=\xym|
|00004660| 61 74 72 69 78 43 4f 4f | 52 44 40 20 23 32 7d 7d |atrixCOO|RD@ #2}}|
|00004670| 0a 5c 44 4f 43 4d 4f 44 | 45 29 0a 0a 09 54 68 65 |.\DOCMOD|E)...The|
|00004680| 20 6d 61 63 72 6f 73 20 | 75 73 65 64 20 66 6f 72 | macros |used for|
|00004690| 20 71 75 65 75 69 6e 67 | 20 61 72 65 20 74 68 65 | queuing| are the|
|000046a0| 73 65 3b 20 6f 6e 6c 79 | 20 74 68 65 20 74 6f 6b |se; only| the tok|
|000046b0| 73 39 20 72 65 70 6c 61 | 63 65 6d 65 6e 74 20 69 |s9 repla|cement i|
|000046c0| 73 0a 09 74 72 69 63 6b | 79 3b 20 66 75 72 74 68 |s..trick|y; furth|
|000046d0| 65 72 6d 6f 72 65 20 71 | 75 65 75 65 69 6e 67 20 |ermore q|ueueing |
|000046e0| 69 73 20 22 6e 6f 74 22 | 20 64 6f 6e 65 20 69 66 |is "not"| done if|
|000046f0| 20 77 65 20 61 72 65 20 | 73 61 76 69 6e 67 20 62 | we are |saving b|
|00004700| 65 63 61 75 73 65 0a 09 | 74 68 65 20 65 66 66 65 |ecause..|the effe|
|00004710| 63 74 20 77 69 6c 6c 20 | 67 69 76 65 20 74 68 65 |ct will |give the|
|00004720| 20 73 61 6d 65 20 72 65 | 73 75 6c 74 20 77 69 74 | same re|sult wit|
|00004730| 68 6f 75 74 20 72 69 73 | 6b 20 6f 66 20 65 78 74 |hout ris|k of ext|
|00004740| 72 65 6d 65 6c 79 20 6c | 6f 6e 67 0a 09 6c 69 6e |remely l|ong..lin|
|00004750| 65 73 20 69 6e 20 74 68 | 65 20 63 6f 6d 70 69 6c |es in th|e compil|
|00004760| 65 64 20 66 69 6c 65 21 | 0a 0a 5c 44 4f 43 4d 4f |ed file!|..\DOCMO|
|00004770| 44 45 28 0a 5c 78 79 64 | 65 66 40 5c 78 79 71 61 |DE(.\xyd|ef@\xyqa|
|00004780| 6c 6c 40 7b 25 0a 20 5c | 69 66 78 79 73 61 76 69 |ll@{%. \|ifxysavi|
|00004790| 6e 67 40 20 5c 6c 65 74 | 5c 78 79 40 3d 5c 78 79 |ng@ \let|\xy@=\xy|
|000047a0| 71 73 40 20 5c 6c 65 74 | 5c 78 79 40 40 69 78 40 |qs@ \let|\xy@@ix@|
|000047b0| 3d 5c 78 79 73 61 76 65 | 40 40 74 6f 6b 73 69 78 |=\xysave|@@toksix|
|000047c0| 40 0a 20 5c 65 6c 73 65 | 20 5c 6c 65 74 5c 78 79 |@. \else| \let\xy|
|000047d0| 40 3d 5c 78 79 71 40 20 | 5c 6c 65 74 5c 78 79 40 |@=\xyq@ |\let\xy@|
|000047e0| 40 69 78 40 3d 5c 78 79 | 71 40 40 74 6f 6b 73 69 |@ix@=\xy|q@@toksi|
|000047f0| 78 40 20 5c 66 69 0a 20 | 5c 6c 65 74 5c 6f 78 79 |x@ \fi. |\let\oxy|
|00004800| 40 3d 5c 78 79 40 7d 0a | 0a 5c 78 79 64 65 66 40 |@=\xy@}.|.\xydef@|
|00004810| 5c 78 79 71 40 23 31 23 | 32 7b 5c 61 64 64 71 40 |\xyq@#1#|2{\addq@|
|00004820| 7b 23 32 7d 7d 0a 0a 5c | 78 79 64 65 66 40 5c 78 |{#2}}..\|xydef@\x|
|00004830| 79 71 40 40 74 6f 6b 73 | 69 78 40 7b 5c 62 65 67 |yq@@toks|ix@{\beg|
|00004840| 69 6e 67 72 6f 75 70 0a | 20 5c 78 79 75 6e 63 61 |ingroup.| \xyunca|
|00004850| 74 63 6f 64 65 73 20 5c | 61 66 74 65 72 61 73 73 |tcodes \|afterass|
|00004860| 69 67 6e 6d 65 6e 74 5c | 78 79 71 40 40 74 6f 6b |ignment\|xyq@@tok|
|00004870| 73 69 78 40 69 20 5c 67 | 6c 6f 62 61 6c 5c 74 6f |six@i \g|lobal\to|
|00004880| 6b 73 39 3d 7d 0a 0a 5c | 78 79 64 65 66 40 5c 78 |ks9=}..\|xydef@\x|
|00004890| 79 71 40 40 74 6f 6b 73 | 69 78 40 69 7b 25 0a 20 |yq@@toks|ix@i{%. |
|000048a0| 5c 44 4e 40 23 23 31 7b | 5c 65 6e 64 67 72 6f 75 |\DN@##1{|\endgrou|
|000048b0| 70 20 5c 78 79 40 40 7b | 5c 67 6c 6f 62 61 6c 5c |p \xy@@{|\global\|
|000048c0| 74 6f 6b 73 39 3d 7b 23 | 23 31 7d 7d 7d 25 0a 20 |toks9={#|#1}}}%. |
|000048d0| 5c 65 78 70 61 6e 64 61 | 66 74 65 72 5c 6e 65 78 |\expanda|fter\nex|
|000048e0| 74 40 5c 65 78 70 61 6e | 64 61 66 74 65 72 7b 5c |t@\expan|dafter{\|
|000048f0| 74 68 65 5c 74 6f 6b 73 | 39 7d 7d 0a 0a 5c 78 79 |the\toks|9}}..\xy|
|00004900| 64 65 66 40 5c 78 79 71 | 73 40 7b 5c 67 6c 6f 62 |def@\xyq|s@{\glob|
|00004910| 61 6c 5c 61 64 76 61 6e | 63 65 5c 6d 61 74 72 69 |al\advan|ce\matri|
|00004920| 78 73 69 7a 65 40 5c 40 | 6e 65 20 5c 78 79 73 61 |xsize@\@|ne \xysa|
|00004930| 76 65 40 7d 0a 5c 44 4f | 43 4d 4f 44 45 29 0a 0a |ve@}.\DO|CMODE)..|
|00004940| 5c 70 61 72 61 67 72 61 | 70 68 2a 7b 49 6e 73 65 |\paragra|ph*{Inse|
|00004950| 72 74 3a 7d 0a 0a 09 46 | 69 6e 61 6c 6c 79 20 77 |rt:}...F|inally w|
|00004960| 65 20 69 6e 73 65 72 74 | 20 74 68 65 20 6d 61 74 |e insert| the mat|
|00004970| 72 69 78 20 69 6e 20 74 | 68 65 20 5c 58 59 2d 70 |rix in t|he \XY-p|
|00004980| 69 63 74 75 72 65 20 6c | 6f 67 69 63 61 6c 6c 79 |icture l|ogically|
|00004990| 20 62 79 20 65 6e 73 75 | 72 69 6e 67 0a 09 74 68 | by ensu|ring..th|
|000049a0| 61 74 20 69 74 20 68 61 | 73 20 74 68 65 20 72 69 |at it ha|s the ri|
|000049b0| 67 68 74 20 73 69 7a 65 | 0a 0a 5c 44 4f 43 4d 4f |ght size|..\DOCMO|
|000049c0| 44 45 28 0a 5c 78 79 64 | 65 66 40 5c 78 79 6d 61 |DE(.\xyd|ef@\xyma|
|000049d0| 74 72 69 78 40 69 6e 73 | 65 72 74 7b 25 0a 20 5c |trix@ins|ert{%. \|
|000049e0| 65 64 65 66 5c 6e 65 78 | 74 69 69 40 7b 7b 5c 63 |edef\nex|tii@{{\c|
|000049f0| 73 6e 61 6d 65 20 58 63 | 6f 6c 40 31 5c 65 6e 64 |sname Xc|ol@1\end|
|00004a00| 63 73 6e 61 6d 65 7d 7b | 5c 63 73 6e 61 6d 65 20 |csname}{|\csname |
|00004a10| 58 63 6f 6c 40 5c 6d 61 | 78 63 6f 6c 40 5c 65 6e |Xcol@\ma|xcol@\en|
|00004a20| 64 63 73 6e 61 6d 65 7d | 25 0a 20 20 7b 5c 63 73 |dcsname}|%. {\cs|
|00004a30| 6e 61 6d 65 20 57 63 6f | 6c 40 5c 6d 61 78 63 6f |name Wco|l@\maxco|
|00004a40| 6c 40 5c 65 6e 64 63 73 | 6e 61 6d 65 7d 7b 5c 63 |l@\endcs|name}{\c|
|00004a50| 73 6e 61 6d 65 20 59 72 | 6f 77 40 5c 6d 61 78 72 |sname Yr|ow@\maxr|
|00004a60| 6f 77 40 5c 65 6e 64 63 | 73 6e 61 6d 65 7d 25 0a |ow@\endc|sname}%.|
|00004a70| 20 20 7b 5c 63 73 6e 61 | 6d 65 20 48 72 6f 77 40 | {\csna|me Hrow@|
|00004a80| 31 5c 65 6e 64 63 73 6e | 61 6d 65 7d 7b 5c 63 73 |1\endcsn|ame}{\cs|
|00004a90| 6e 61 6d 65 20 59 72 6f | 77 40 31 5c 65 6e 64 63 |name Yro|w@1\endc|
|00004aa0| 73 6e 61 6d 65 7d 7d 25 | 0a 20 5c 65 78 70 61 6e |sname}}%|. \expan|
|00004ab0| 64 61 66 74 65 72 5c 78 | 79 6d 61 74 72 69 78 40 |dafter\x|ymatrix@|
|00004ac0| 69 6e 73 65 72 74 40 5c | 6e 65 78 74 69 69 40 7d |insert@\|nextii@}|
|00004ad0| 0a 0a 5c 78 79 64 65 66 | 40 5c 78 79 6d 61 74 72 |..\xydef|@\xymatr|
|00004ae0| 69 78 40 69 6e 73 65 72 | 74 40 23 31 23 32 23 33 |ix@inser|t@#1#2#3|
|00004af0| 23 34 23 35 23 36 7b 25 | 0a 20 5c 78 79 40 7b 4d |#4#5#6{%|. \xy@{M|
|00004b00| 41 54 52 49 58 20 49 4e | 53 45 52 54 7d 7b 5c 4c |ATRIX IN|SERT}{\L|
|00004b10| 63 3d 2d 23 31 5c 52 63 | 3d 23 32 5c 61 64 76 61 |c=-#1\Rc|=#2\adva|
|00004b20| 6e 63 65 5c 52 63 23 33 | 5c 72 65 6c 61 78 0a 20 |nce\Rc#3|\relax. |
|00004b30| 20 5c 44 63 3d 2d 23 34 | 5c 61 64 76 61 6e 63 65 | \Dc=-#4|\advance|
|00004b40| 5c 44 63 23 35 5c 55 63 | 3d 23 36 5c 72 65 6c 61 |\Dc#5\Uc|=#6\rela|
|00004b50| 78 0a 20 20 5c 45 64 67 | 65 63 3d 7b 5c 72 65 63 |x. \Edg|ec={\rec|
|00004b60| 74 61 6e 67 6c 65 45 64 | 67 65 7d 7d 7d 0a 5c 44 |tangleEd|ge}}}.\D|
|00004b70| 4f 43 4d 4f 44 45 29 0a | 0a 09 5c 54 4f 44 4f 3a |OCMODE).|..\TODO:|
|00004b80| 20 53 68 6f 75 6c 64 20 | 68 61 6e 64 6c 65 20 6f | Should |handle o|
|00004b90| 74 68 65 72 20 66 6f 72 | 6d 73 20 74 68 61 6e 20 |ther for|ms than |
|00004ba0| 72 65 66 65 72 65 6e 63 | 65 20 70 6f 69 6e 74 20 |referenc|e point |
|00004bb0| 61 74 20 63 65 6e 74 65 | 72 0a 09 6f 66 7e 7c 22 |at cente|r..of~|"|
|00004bc0| 31 2c 31 22 7c 20 61 73 | 20 68 61 72 64 63 6f 64 |1,1"| as| hardcod|
|00004bd0| 65 64 20 68 65 72 65 2e | 20 20 49 6e 20 70 61 72 |ed here.| In par|
|00004be0| 74 69 63 75 6c 61 72 20 | 72 65 66 65 72 65 6e 63 |ticular |referenc|
|00004bf0| 65 20 70 6f 69 6e 74 20 | 61 74 0a 09 62 61 73 65 |e point |at..base|
|00004c00| 6c 69 6e 65 20 6f 66 20 | 7c 22 31 2c 31 22 7c 20 |line of ||"1,1"| |
|00004c10| 77 6f 75 6c 64 20 62 65 | 20 75 73 65 66 75 6c 5c |would be| useful\|
|00004c20| 64 6f 74 73 0a 0a 5c 44 | 4f 43 4d 4f 44 45 33 25 |dots..\D|OCMODE3%|
|00004c30| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00004c40| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00004c50| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00004c60| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00004c70| 25 25 25 0a 0a 0c 0a 5c | 73 75 62 73 65 63 74 69 |%%%....\|subsecti|
|00004c80| 6f 6e 7b 4e 65 77 20 63 | 6f 6f 72 64 69 6e 61 74 |on{New c|oordinat|
|00004c90| 65 20 66 6f 72 6d 61 74 | 73 7d 0a 3f 3f 3d 5b 63 |e format|s}.??=[c|
|00004ca0| 6f 6f 72 64 5d 0a 25 0a | 09 69 74 20 69 73 20 70 |oord].%.|.it is p|
|00004cb0| 6f 73 73 69 62 6c 65 20 | 77 69 74 68 69 6e 20 65 |ossible |within e|
|00004cc0| 6e 74 72 69 65 73 20 74 | 6f 20 72 65 66 65 72 20 |ntries t|o refer |
|00004cd0| 74 6f 20 61 6c 6c 20 74 | 68 65 20 65 6e 74 72 69 |to all t|he entri|
|00004ce0| 65 73 20 6f 66 20 74 68 | 65 0a 09 5c 58 59 2d 6d |es of th|e..\XY-m|
|00004cf0| 61 74 72 69 78 20 75 73 | 69 6e 67 20 74 68 65 20 |atrix us|ing the |
|00004d00| 66 6f 6c 6c 6f 77 69 6e | 67 20 73 70 65 63 69 61 |followin|g specia|
|00004d10| 6c 20 3c 63 6f 6f 72 64 | 3e 69 6e 61 74 65 20 66 |l <coord|>inate f|
|00004d20| 6f 72 6d 73 3a 0a 25 0a | 5c 62 65 67 69 6e 7b 64 |orms:.%.|\begin{d|
|00004d30| 65 66 73 7d 0a 25 0a 20 | 7c 22 7c 24 72 24 7c 2c |efs}.%. ||"|$r$|,|
|00004d40| 7c 24 63 24 7c 22 7c 0a | 09 26 20 50 6f 73 69 74 ||$c$|"|.|.& Posit|
|00004d50| 69 6f 6e 20 61 6e 64 20 | 65 78 74 65 6e 74 73 20 |ion and |extents |
|00004d60| 6f 66 20 65 6e 74 72 79 | 20 69 6e 20 72 6f 77 20 |of entry| in row |
|00004d70| 24 72 24 2c 20 63 6f 6c | 75 6d 6e 20 24 63 24 20 |$r$, col|umn $c$ |
|00004d80| 28 74 6f 70 20 6c 65 66 | 74 20 69 73 0a 09 20 20 |(top lef|t is.. |
|00004d90| 7c 22 31 2c 31 22 7c 29 | 0a 5c 63 72 0a 20 7c 5b ||"1,1"|)|.\cr. |[|
|00004da0| 7c 24 5c 44 65 6c 74 61 | 20 72 24 7c 2c 7c 24 5c ||$\Delta| r$|,|$\|
|00004db0| 44 65 6c 74 61 20 63 24 | 7c 5d 7c 0a 09 26 20 24 |Delta c$||]|..& $|
|00004dc0| 5c 44 65 6c 74 61 20 72 | 24 20 72 6f 77 73 20 62 |\Delta r|$ rows b|
|00004dd0| 65 6c 6f 77 20 61 6e 64 | 20 24 5c 44 65 6c 74 61 |elow and| $\Delta|
|00004de0| 20 63 24 20 63 6f 6c 75 | 6d 6e 73 20 72 69 67 68 | c$ colu|mns righ|
|00004df0| 74 20 6f 66 20 63 75 72 | 72 65 6e 74 20 65 6e 74 |t of cur|rent ent|
|00004e00| 72 79 0a 5c 63 72 0a 20 | 7c 5b 7c 20 3c 68 6f 70 |ry.\cr. ||[| <hop|
|00004e10| 3e 5c 73 74 61 72 5c 20 | 7c 5d 7c 0a 09 26 20 65 |>\star\ ||]|..& e|
|00004e20| 6e 74 72 79 20 72 65 61 | 63 68 65 64 20 62 79 20 |ntry rea|ched by |
|00004e30| 74 68 65 20 3c 68 6f 70 | 3e 73 3b 20 65 61 63 68 |the <hop|>s; each|
|00004e40| 20 3c 68 6f 70 3e 20 69 | 73 20 6f 6e 65 20 6f 66 | <hop> i|s one of|
|00004e50| 20 7c 64 75 6c 72 7c 20 | 64 65 73 63 72 69 62 69 | |dulr| |describi|
|00004e60| 6e 67 0a 09 20 20 6f 6e | 65 20 60 6d 6f 76 65 27 |ng.. on|e `move'|
|00004e70| 20 74 6f 20 61 20 6e 65 | 69 67 68 62 6f 72 20 65 | to a ne|ighbor e|
|00004e80| 6e 74 72 79 0a 0a 5c 63 | 72 0a 5c 65 6e 64 7b 64 |ntry..\c|r.\end{d|
|00004e90| 65 66 73 7d 0a 5c 6e 6f | 69 6e 64 65 6e 74 5c 75 |efs}.\no|indent\u|
|00004ea0| 6e 73 6b 69 70 0a 25 0a | 09 53 6f 20 74 68 65 20 |nskip.%.|.So the |
|00004eb0| 63 75 72 72 65 6e 74 20 | 65 6e 74 72 79 20 68 61 |current |entry ha|
|00004ec0| 73 20 74 68 65 20 73 79 | 6e 6f 6e 79 6d 73 20 7c |s the sy|nonyms ||
|00004ed0| 5b 30 2c 30 5d 7c 2c 20 | 7c 5b 5d 7c 2c 20 7c 5b |[0,0]|, ||[]|, |[|
|00004ee0| 72 6c 5d 7c 2c 20 7c 5b | 75 64 5d 7c 2c 0a 09 7c |rl]|, |[|ud]|,..||
|00004ef0| 5b 64 75 64 75 5d 7c 2c | 20 65 74 63 2e 0a 0a 09 |[dudu]|,| etc....|
|00004f00| 54 68 65 73 65 20 66 6f | 72 6d 73 20 61 72 65 20 |These fo|rms are |
|00004f10| 75 73 65 66 75 6c 20 66 | 6f 72 20 64 65 66 69 6e |useful f|or defin|
|00004f20| 69 6e 67 20 64 69 61 67 | 72 61 6d 73 20 77 68 65 |ing diag|rams whe|
|00004f30| 72 65 20 74 68 65 20 65 | 6e 74 72 69 65 73 20 61 |re the e|ntries a|
|00004f40| 72 65 0a 09 72 65 6c 61 | 74 65 64 2c 20 5c 65 67 |re..rela|ted, \eg|
|00004f50| 2c 0a 25 0a 5c 62 65 67 | 69 6e 7b 63 6f 64 65 7d |,.%.\beg|in{code}|
|00004f60| 0a 24 24 5c 78 79 0a 5c | 78 79 6d 61 74 72 69 78 |.$$\xy.\|xymatrix|
|00004f70| 7b 0a 20 41 20 5c 50 4f | 53 5b 5d 3b 5b 64 5d 2a |{. A \PO|S[];[d]*|
|00004f80| 2a 5c 64 69 72 7b 7e 7d | 2c 0a 20 20 20 20 20 20 |*\dir{~}|,. |
|00004f90| 20 5b 5d 3b 5b 64 72 5d | 2a 2a 5c 64 69 72 7b 2d | [];[dr]|**\dir{-|
|00004fa0| 7d 20 20 20 20 5c 5c 0a | 20 42 20 26 20 43 20 5c |} \\.| B & C \|
|00004fb0| 50 4f 53 5b 5d 3b 5b 6c | 5d 2a 2a 5c 64 69 72 7b |POS[];[l|]**\dir{|
|00004fc0| 2e 7d 20 7d 0a 5c 65 6e | 64 78 79 24 24 0a 5c 65 |.} }.\en|dxy$$.\e|
|00004fd0| 6e 64 7b 63 6f 64 65 7d | 0a 5c 64 6f 63 6f 64 65 |nd{code}|.\docode|
|00004fe0| 0a 25 0a 09 77 61 73 20 | 74 79 70 65 73 65 74 20 |.%..was |typeset |
|00004ff0| 62 79 0a 25 0a 5c 64 69 | 73 70 6c 61 79 63 6f 64 |by.%.\di|splaycod|
|00005000| 65 0a 0a 09 49 66 20 61 | 6e 20 65 6e 74 72 79 20 |e...If a|n entry |
|00005010| 6f 75 74 73 69 64 65 20 | 74 68 65 20 5c 58 59 2d |outside |the \XY-|
|00005020| 6d 61 74 72 69 78 20 69 | 73 20 72 65 66 65 72 65 |matrix i|s refere|
|00005030| 6e 63 65 64 20 74 68 65 | 6e 20 61 6e 20 65 72 72 |nced the|n an err|
|00005040| 6f 72 20 69 73 0a 09 72 | 65 70 6f 72 74 65 64 2e |or is..r|eported.|
|00005050| 0a 0a 5c 44 4f 43 4d 4f | 44 45 32 25 25 25 25 25 |..\DOCMO|DE2%%%%%|
|00005060| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005070| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005080| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005090| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 0a |%%%%%%%%|%%%%%%%.|
|000050a0| 0a 09 54 68 65 73 65 20 | 68 61 6e 64 6c 65 20 74 |..These |handle t|
|000050b0| 68 65 20 70 61 72 73 69 | 6e 67 20 61 6e 64 20 69 |he parsi|ng and i|
|000050c0| 6e 74 65 72 70 72 65 74 | 61 74 69 6f 6e 20 6f 66 |nterpret|ation of|
|000050d0| 20 62 72 61 63 6b 65 74 | 65 64 0a 09 3c 63 6f 6f | bracket|ed..<coo|
|000050e0| 72 64 3e 69 6e 61 74 65 | 73 3b 20 74 68 65 20 6e |rd>inate|s; the n|
|000050f0| 75 6d 62 65 72 20 69 73 | 20 63 6f 6d 70 75 74 65 |umber is| compute|
|00005100| 64 20 61 6c 72 65 61 64 | 79 20 61 74 20 70 61 72 |d alread|y at par|
|00005110| 73 65 20 74 69 6d 65 3a | 0a 0a 5c 44 4f 43 4d 4f |se time:|..\DOCMO|
|00005120| 44 45 28 0a 5c 78 79 6c | 65 74 40 5c 74 68 65 6d |DE(.\xyl|et@\them|
|00005130| 61 74 72 69 78 43 4f 4f | 52 44 40 40 3d 5c 72 65 |atrixCOO|RD@@=\re|
|00005140| 6c 61 78 0a 0a 5c 78 79 | 64 65 66 40 5c 78 79 6d |lax..\xy|def@\xym|
|00005150| 61 74 72 69 78 43 4f 4f | 52 44 40 7b 25 0a 20 5c |atrixCOO|RD@{%. \|
|00005160| 69 66 78 20 5b 5c 6e 65 | 78 74 20 25 5d 0a 20 20 |ifx [\ne|xt %]. |
|00005170| 5c 44 4e 40 5b 23 23 31 | 5d 7b 5c 78 79 40 7b 5b |\DN@[##1|]{\xy@{[|
|00005180| 23 23 31 5d 7d 7b 5c 64 | 65 66 5c 74 68 65 6d 61 |##1]}{\d|ef\thema|
|00005190| 74 72 69 78 43 4f 4f 52 | 44 40 40 7b 5b 23 23 31 |trixCOOR|D@@{[##1|
|000051a0| 5d 7d 7d 25 0a 20 20 20 | 5c 78 79 46 4e 40 5c 78 |]}}%. |\xyFN@\x|
|000051b0| 79 6d 61 74 72 69 78 43 | 4f 4f 52 44 40 69 23 23 |ymatrixC|OORD@i##|
|000051c0| 31 5d 7d 25 0a 20 5c 65 | 6c 73 65 20 5c 6c 65 74 |1]}%. \e|lse \let|
|000051d0| 5c 6e 65 78 74 40 3d 5c | 78 79 6d 61 74 72 69 78 |\next@=\|xymatrix|
|000051e0| 73 61 76 65 64 43 4f 4f | 52 44 40 0a 20 5c 66 69 |savedCOO|RD@. \fi|
|000051f0| 20 5c 6e 65 78 74 40 7d | 0a 0a 5c 78 79 64 65 66 | \next@}|..\xydef|
|00005200| 40 5c 78 79 6d 61 74 72 | 69 78 43 4f 4f 52 44 40 |@\xymatr|ixCOORD@|
|00005210| 69 7b 5c 63 6f 75 6e 74 | 40 3d 5c 72 6f 77 40 20 |i{\count|@=\row@ |
|00005220| 5c 63 6f 75 6e 74 40 40 | 3d 5c 63 6f 6c 40 0a 20 |\count@@|=\col@. |
|00005230| 5c 69 66 63 61 74 20 41 | 5c 6e 65 78 74 20 5c 6c |\ifcat A|\next \l|
|00005240| 65 74 5c 6e 65 78 74 40 | 3d 5c 78 79 6d 61 74 72 |et\next@|=\xymatr|
|00005250| 69 78 43 4f 4f 52 44 40 | 6c 65 74 74 65 72 20 25 |ixCOORD@|letter %|
|00005260| 5b 0a 20 5c 65 6c 73 65 | 5c 69 66 78 20 5d 5c 6e |[. \else|\ifx ]\n|
|00005270| 65 78 74 20 5c 6c 65 74 | 5c 6e 65 78 74 40 3d 5c |ext \let|\next@=\|
|00005280| 78 79 6d 61 74 72 69 78 | 43 4f 4f 52 44 40 6c 65 |xymatrix|COORD@le|
|00005290| 74 74 65 72 0a 20 5c 65 | 6c 73 65 20 5c 6c 65 74 |tter. \e|lse \let|
|000052a0| 5c 6e 65 78 74 40 3d 5c | 78 79 6d 61 74 72 69 78 |\next@=\|xymatrix|
|000052b0| 43 4f 4f 52 44 40 6f 74 | 68 65 72 20 5c 66 69 5c |COORD@ot|her \fi\|
|000052c0| 66 69 20 5c 6e 65 78 74 | 40 7d 0a 0a 5c 78 79 64 |fi \next|@}..\xyd|
|000052d0| 65 66 40 5c 78 79 6d 61 | 74 72 69 78 43 4f 4f 52 |ef@\xyma|trixCOOR|
|000052e0| 44 40 6c 65 74 74 65 72 | 7b 25 0a 20 5c 69 66 78 |D@letter|{%. \ifx|
|000052f0| 20 75 5c 6e 65 78 74 20 | 5c 61 64 76 61 6e 63 65 | u\next |\advance|
|00005300| 5c 63 6f 75 6e 74 40 5c | 6d 40 6e 65 20 5c 44 4e |\count@\|m@ne \DN|
|00005310| 40 20 75 7b 5c 78 79 46 | 4e 40 5c 78 79 6d 61 74 |@ u{\xyF|N@\xymat|
|00005320| 72 69 78 43 4f 4f 52 44 | 40 6c 65 74 74 65 72 7d |rixCOORD|@letter}|
|00005330| 25 0a 20 5c 65 6c 73 65 | 5c 69 66 78 20 64 5c 6e |%. \else|\ifx d\n|
|00005340| 65 78 74 20 5c 61 64 76 | 61 6e 63 65 5c 63 6f 75 |ext \adv|ance\cou|
|00005350| 6e 74 40 5c 40 6e 65 20 | 5c 44 4e 40 20 64 7b 5c |nt@\@ne |\DN@ d{\|
|00005360| 78 79 46 4e 40 5c 78 79 | 6d 61 74 72 69 78 43 4f |xyFN@\xy|matrixCO|
|00005370| 4f 52 44 40 6c 65 74 74 | 65 72 7d 25 0a 20 5c 65 |ORD@lett|er}%. \e|
|00005380| 6c 73 65 5c 69 66 78 20 | 6c 5c 6e 65 78 74 20 5c |lse\ifx |l\next \|
|00005390| 61 64 76 61 6e 63 65 5c | 63 6f 75 6e 74 40 40 5c |advance\|count@@\|
|000053a0| 6d 40 6e 65 20 5c 44 4e | 40 20 6c 7b 5c 78 79 46 |m@ne \DN|@ l{\xyF|
|000053b0| 4e 40 5c 78 79 6d 61 74 | 72 69 78 43 4f 4f 52 44 |N@\xymat|rixCOORD|
|000053c0| 40 6c 65 74 74 65 72 7d | 25 0a 20 5c 65 6c 73 65 |@letter}|%. \else|
|000053d0| 5c 69 66 78 20 72 5c 6e | 65 78 74 20 5c 61 64 76 |\ifx r\n|ext \adv|
|000053e0| 61 6e 63 65 5c 63 6f 75 | 6e 74 40 40 5c 40 6e 65 |ance\cou|nt@@\@ne|
|000053f0| 20 5c 44 4e 40 20 72 7b | 5c 78 79 46 4e 40 5c 78 | \DN@ r{|\xyFN@\x|
|00005400| 79 6d 61 74 72 69 78 43 | 4f 4f 52 44 40 6c 65 74 |ymatrixC|OORD@let|
|00005410| 74 65 72 7d 25 0a 20 5c | 65 6c 73 65 5c 69 66 78 |ter}%. \|else\ifx|
|00005420| 20 5d 5c 6e 65 78 74 20 | 5c 44 4e 40 5d 7b 5c 78 | ]\next |\DN@]{\x|
|00005430| 79 6d 61 74 72 69 78 43 | 4f 4f 52 44 40 78 7d 25 |ymatrixC|OORD@x}%|
|00005440| 0a 20 5c 65 6c 73 65 20 | 5c 6c 65 74 5c 6e 65 78 |. \else |\let\nex|
|00005450| 74 40 3d 5c 78 79 6d 61 | 74 72 69 78 43 4f 4f 52 |t@=\xyma|trixCOOR|
|00005460| 44 40 6c 65 74 74 65 72 | 0a 20 20 20 5c 78 79 65 |D@letter|. \xye|
|00005470| 72 72 6f 72 40 7b 69 6c | 6c 65 67 61 6c 20 3c 63 |rror@{il|legal <c|
|00005480| 6f 6f 72 64 3e 3a 20 6f | 6e 6c 79 20 6c 65 74 74 |oord>: o|nly lett|
|00005490| 65 72 73 20 6c 72 75 64 | 20 77 69 74 68 69 6e 20 |ers lrud| within |
|000054a0| 5c 73 74 72 69 6e 67 5b | 5c 73 74 72 69 6e 67 5d |\string[|\string]|
|000054b0| 73 7d 7b 7d 25 0a 20 5c | 66 69 5c 66 69 5c 66 69 |s}{}%. \|fi\fi\fi|
|000054c0| 5c 66 69 5c 66 69 20 5c | 6e 65 78 74 40 7d 0a 0a |\fi\fi \|next@}..|
|000054d0| 5c 78 79 64 65 66 40 5c | 78 79 6d 61 74 72 69 78 |\xydef@\|xymatrix|
|000054e0| 43 4f 4f 52 44 40 6f 74 | 68 65 72 23 31 2c 23 32 |COORD@ot|her#1,#2|
|000054f0| 5d 7b 25 0a 20 5c 61 64 | 76 61 6e 63 65 5c 63 6f |]{%. \ad|vance\co|
|00005500| 75 6e 74 40 23 31 5c 61 | 64 76 61 6e 63 65 5c 63 |unt@#1\a|dvance\c|
|00005510| 6f 75 6e 74 40 40 23 32 | 5c 78 79 6d 61 74 72 69 |ount@@#2|\xymatri|
|00005520| 78 43 4f 4f 52 44 40 78 | 7d 0a 5c 44 4f 43 4d 4f |xCOORD@x|}.\DOCMO|
|00005530| 44 45 29 0a 0a 09 54 68 | 65 20 6e 65 78 74 20 64 |DE)...Th|e next d|
|00005540| 6f 65 73 20 74 68 65 20 | 61 63 74 75 61 6c 20 6c |oes the |actual l|
|00005550| 6f 6f 6b 75 70 20 61 74 | 20 5c 58 59 2d 74 69 6d |ookup at| \XY-tim|
|00005560| 65 20 77 68 65 72 65 20 | 77 65 20 63 61 6e 20 73 |e where |we can s|
|00005570| 74 69 6c 6c 20 70 72 69 | 6e 74 0a 09 61 6e 20 65 |till pri|nt..an e|
|00005580| 72 72 6f 72 20 6d 65 73 | 73 61 67 65 20 75 73 69 |rror mes|sage usi|
|00005590| 6e 67 20 74 68 65 20 73 | 61 76 65 64 20 6f 72 69 |ng the s|aved ori|
|000055a0| 67 69 6e 61 6c 20 66 6f | 72 6d 2e 0a 0a 5c 44 4f |ginal fo|rm...\DO|
|000055b0| 43 4d 4f 44 45 28 0a 5c | 78 79 64 65 66 40 5c 78 |CMODE(.\|xydef@\x|
|000055c0| 79 6d 61 74 72 69 78 43 | 4f 4f 52 44 40 78 7b 5c |ymatrixC|OORD@x{\|
|000055d0| 44 4e 40 23 23 31 7b 5c | 78 79 40 40 7b 25 0a 20 |DN@##1{\|xy@@{%. |
|000055e0| 20 20 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 6c | \expan|dafter\l|
|000055f0| 65 74 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 6e |et\expan|dafter\n|
|00005600| 65 78 74 40 5c 63 73 6e | 61 6d 65 20 51 40 23 23 |ext@\csn|ame Q@##|
|00005610| 31 5c 65 6e 64 63 73 6e | 61 6d 65 0a 20 20 20 5c |1\endcsn|ame. \|
|00005620| 69 66 78 5c 6e 65 78 74 | 40 5c 72 65 6c 61 78 20 |ifx\next|@\relax |
|00005630| 5c 78 79 65 72 72 6f 72 | 40 52 43 7b 23 23 31 7d |\xyerror|@RC{##1}|
|00005640| 5c 65 6c 73 65 20 5c 6e | 65 78 74 40 5c 66 69 7d |\else \n|ext@\fi}|
|00005650| 25 0a 20 20 5c 61 66 74 | 65 72 43 4f 4f 52 44 40 |%. \aft|erCOORD@|
|00005660| 7d 25 0a 20 5c 65 64 65 | 66 5c 6e 65 78 74 69 69 |}%. \ede|f\nextii|
|00005670| 40 7b 7b 5c 74 68 65 5c | 63 6f 75 6e 74 40 2c 5c |@{{\the\|count@,\|
|00005680| 74 68 65 5c 63 6f 75 6e | 74 40 40 7d 7d 5c 65 78 |the\coun|t@@}}\ex|
|00005690| 70 61 6e 64 61 66 74 65 | 72 5c 6e 65 78 74 40 5c |pandafte|r\next@\|
|000056a0| 6e 65 78 74 69 69 40 7d | 0a 0a 5c 78 79 64 65 66 |nextii@}|..\xydef|
|000056b0| 40 5c 78 79 65 72 72 6f | 72 40 52 43 23 31 7b 5c |@\xyerro|r@RC#1{\|
|000056c0| 78 79 65 72 72 6f 72 40 | 7b 69 6e 20 65 6e 74 72 |xyerror@|{in entr|
|000056d0| 79 09 5c 73 74 72 69 6e | 67 22 5c 74 68 65 5c 72 |y.\strin|g"\the\r|
|000056e0| 6f 77 40 2c 5c 74 68 65 | 5c 63 6f 6c 40 5c 73 74 |ow@,\the|\col@\st|
|000056f0| 72 69 6e 67 22 3a 20 4e | 6f 0a 09 5c 63 6f 64 65 |ring": N|o..\code|
|00005700| 6f 66 5c 74 68 65 6d 61 | 74 72 69 78 43 4f 4f 52 |of\thema|trixCOOR|
|00005710| 44 40 40 5c 73 70 61 63 | 65 20 28 69 73 20 5c 73 |D@@\spac|e (is \s|
|00005720| 74 72 69 6e 67 22 23 31 | 5c 73 74 72 69 6e 67 22 |tring"#1|\string"|
|00005730| 29 20 66 72 6f 6d 20 68 | 65 72 65 7d 7b 7d 7d 0a |) from h|ere}{}}.|
|00005740| 5c 44 4f 43 4d 4f 44 45 | 29 0a 0a 5c 44 4f 43 4d |\DOCMODE|)..\DOCM|
|00005750| 4f 44 45 33 25 25 25 25 | 25 25 25 25 25 25 25 25 |ODE3%%%%|%%%%%%%%|
|00005760| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005770| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005780| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005790| 25 25 25 25 25 25 25 25 | 25 25 0a 0a 0c 0a 5c 73 |%%%%%%%%|%%....\s|
|000057a0| 75 62 73 65 63 74 69 6f | 6e 7b 53 70 61 63 69 6e |ubsectio|n{Spacin|
|000057b0| 67 20 61 6e 64 20 72 6f | 74 61 74 69 6f 6e 7d 0a |g and ro|tation}.|
|000057c0| 3f 3f 3d 5b 73 70 61 63 | 69 6e 67 5d 0a 25 0a 09 |??=[spac|ing].%..|
|000057d0| 54 68 65 20 64 65 66 61 | 75 6c 74 20 73 70 61 63 |The defa|ult spac|
|000057e0| 69 6e 67 20 64 69 73 74 | 61 6e 63 65 73 20 62 65 |ing dist|ances be|
|000057f0| 74 77 65 65 6e 20 72 6f | 77 73 20 61 6e 64 20 63 |tween ro|ws and c|
|00005800| 6f 6c 75 6d 6e 73 20 61 | 72 65 20 63 61 6c 6c 65 |olumns a|re calle|
|00005810| 64 0a 09 22 72 6f 77 73 | 65 70 22 20 61 6e 64 20 |d.."rows|ep" and |
|00005820| 22 63 6f 6c 73 65 70 22 | 2e 20 20 54 68 65 79 20 |"colsep"|. They |
|00005830| 63 61 6e 20 62 65 20 63 | 68 61 6e 67 65 64 20 66 |can be c|hanged f|
|00005840| 72 6f 6d 20 74 68 65 20 | 64 65 66 61 75 6c 74 20 |rom the |default |
|00005850| 7c 32 70 63 7c 20 62 79 | 0a 09 74 77 6f 20 73 70 ||2pc| by|..two sp|
|00005860| 65 63 69 61 6c 20 63 6f | 6d 6d 61 6e 64 73 20 73 |ecial co|mmands s|
|00005870| 69 6d 69 6c 61 72 20 74 | 6f 20 74 68 65 20 6f 6e |imilar t|o the on|
|00005880| 65 73 20 66 6f 72 20 74 | 68 65 20 64 65 66 61 75 |es for t|he defau|
|00005890| 6c 74 73 20 69 6e 20 74 | 68 65 0a 09 6b 65 72 6e |lts in t|he..kern|
|000058a0| 65 6c 3a 0a 25 0a 5c 62 | 65 67 69 6e 7b 64 65 66 |el:.%.\b|egin{def|
|000058b0| 73 31 7d 0a 20 7c 5c 78 | 79 6d 61 74 72 69 78 72 |s1}. |\x|ymatrixr|
|000058c0| 6f 77 73 65 70 7c 20 3c | 61 64 64 7e 6f 70 3e 20 |owsep| <|add~op> |
|000058d0| 7c 7b 7c 3c 64 69 6d 65 | 6e 3e 7c 7d 7c 20 5c 63 ||{|<dime|n>|}| \c|
|000058e0| 72 0a 20 7c 5c 78 79 6d | 61 74 72 69 78 63 6f 6c |r. |\xym|atrixcol|
|000058f0| 73 65 70 7c 20 3c 61 64 | 64 7e 6f 70 3e 20 7c 7b |sep| <ad|d~op> |{|
|00005900| 7c 3c 64 69 6d 65 6e 3e | 7c 7d 7c 20 5c 63 72 0a ||<dimen>||}| \cr.|
|00005910| 5c 65 6e 64 7b 64 65 66 | 73 31 7d 0a 5c 6e 6f 69 |\end{def|s1}.\noi|
|00005920| 6e 64 65 6e 74 5c 75 6e | 73 6b 69 70 0a 25 0a 09 |ndent\un|skip.%..|
|00005930| 54 68 65 20 73 70 61 63 | 69 6e 67 20 61 72 6f 75 |The spac|ing arou|
|00005940| 6e 64 20 65 61 63 68 20 | 6f 62 6a 65 63 74 20 63 |nd each |object c|
|00005950| 61 6e 20 61 6c 73 6f 20 | 62 65 20 63 68 61 6e 67 |an also |be chang|
|00005960| 65 64 20 74 68 72 6f 75 | 67 68 20 6d 6f 64 69 66 |ed throu|gh modif|
|00005970| 69 65 72 73 0a 09 61 73 | 20 65 78 70 6c 61 69 6e |iers..as| explain|
|00005980| 65 64 20 69 6e 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |ed in th|e follow|
|00005990| 69 6e 67 20 73 65 63 74 | 69 6f 6e 2e 0a 0a 5c 44 |ing sect|ion...\D|
|000059a0| 4f 43 4d 4f 44 45 28 0a | 5c 78 79 64 65 66 40 5c |OCMODE(.|\xydef@\|
|000059b0| 78 79 6d 61 74 72 69 78 | 72 6f 77 73 65 70 40 7b |xymatrix|rowsep@{|
|000059c0| 32 70 63 7d 0a 5c 78 79 | 64 65 66 40 5c 78 79 6d |2pc}.\xy|def@\xym|
|000059d0| 61 74 72 69 78 63 6f 6c | 73 65 70 40 7b 32 70 63 |atrixcol|sep@{2pc|
|000059e0| 7d 0a 0a 5c 78 79 64 65 | 66 40 5c 78 79 6d 61 74 |}..\xyde|f@\xymat|
|000059f0| 72 69 78 72 6f 77 73 65 | 70 7b 5c 61 66 74 65 72 |rixrowse|p{\after|
|00005a00| 41 44 44 4f 50 7b 5c 41 | 64 64 6f 70 40 40 5c 78 |ADDOP{\A|ddop@@\x|
|00005a10| 79 6d 61 74 72 69 78 72 | 6f 77 73 65 70 40 7d 7d |ymatrixr|owsep@}}|
|00005a20| 0a 5c 78 79 64 65 66 40 | 5c 78 79 6d 61 74 72 69 |.\xydef@|\xymatri|
|00005a30| 78 63 6f 6c 73 65 70 7b | 5c 61 66 74 65 72 41 44 |xcolsep{|\afterAD|
|00005a40| 44 4f 50 7b 5c 41 64 64 | 6f 70 40 40 5c 78 79 6d |DOP{\Add|op@@\xym|
|00005a50| 61 74 72 69 78 63 6f 6c | 73 65 70 40 7d 7d 0a 5c |atrixcol|sep@}}.\|
|00005a60| 44 4f 43 4d 4f 44 45 29 | 0a 0a 09 41 6e 20 65 6e |DOCMODE)|...An en|
|00005a70| 74 69 72 65 20 6d 61 74 | 72 69 78 20 63 61 6e 20 |tire mat|rix can |
|00005a80| 62 65 20 72 6f 74 61 74 | 65 64 20 62 79 20 61 64 |be rotat|ed by ad|
|00005a90| 64 69 6e 67 20 61 20 22 | 72 6f 74 61 74 69 6f 6e |ding a "|rotation|
|00005aa0| 20 70 72 65 66 69 78 22 | 20 62 65 74 77 65 65 6e | prefix"| between|
|00005ab0| 0a 09 74 68 65 20 7c 5c | 78 79 6d 61 74 72 69 78 |..the |\|xymatrix|
|00005ac0| 7c 20 63 6f 6d 6d 61 6e | 64 20 61 6e 64 20 74 68 || comman|d and th|
|00005ad0| 65 20 6f 70 65 6e 69 6e | 67 7e 7c 7b 7c 3a 0a 25 |e openin|g~|{|:.%|
|00005ae0| 0a 5c 62 65 67 69 6e 7b | 64 65 66 73 31 7d 0a 20 |.\begin{|defs1}. |
|00005af0| 7c 40 7c 3c 64 69 72 65 | 63 74 69 6f 6e 3e 20 5c ||@|<dire|ction> \|
|00005b00| 63 72 0a 25 20 7c 3a 28 | 7c 3c 66 61 63 74 6f 72 |cr.% |:(||<factor|
|00005b10| 3e 7c 2c 7c 3c 66 61 63 | 74 6f 72 3e 7c 29 7c 20 |>|,|<fac|tor>|)| |
|00005b20| 5c 63 72 0a 5c 65 6e 64 | 7b 64 65 66 73 31 7d 0a |\cr.\end|{defs1}.|
|00005b30| 5c 6e 6f 69 6e 64 65 6e | 74 5c 75 6e 73 6b 69 70 |\noinden|t\unskip|
|00005b40| 0a 25 0a 09 54 68 69 73 | 20 77 69 6c 6c 20 73 65 |.%..This| will se|
|00005b50| 74 20 74 68 65 20 6f 72 | 69 65 6e 74 61 74 69 6f |t the or|ientatio|
|00005b60| 6e 20 6f 66 20 74 68 65 | 20 72 6f 77 73 20 74 6f |n of the| rows to|
|00005b70| 20 3c 64 69 72 65 63 74 | 69 6f 6e 3e 20 28 74 68 | <direct|ion> (th|
|00005b80| 65 20 64 65 66 61 75 6c | 74 0a 09 63 6f 72 72 65 |e defaul|t..corre|
|00005b90| 73 70 6f 6e 64 73 20 74 | 6f 20 7c 40 72 7c 29 2e |sponds t|o |@r|).|
|00005ba0| 0a 0a 09 5c 4e 4f 54 45 | 3a 20 52 6f 74 61 74 69 |...\NOTE|: Rotati|
|00005bb0| 6f 6e 20 69 73 20 65 78 | 70 65 72 69 6d 65 6e 74 |on is ex|periment|
|00005bc0| 61 6c 20 61 6e 64 20 74 | 68 65 20 73 70 61 63 69 |al and t|he spaci|
|00005bd0| 6e 67 20 6f 66 20 61 20 | 72 6f 74 61 74 65 64 20 |ng of a |rotated |
|00005be0| 6d 61 74 72 69 78 0a 09 | 6d 61 79 20 63 68 61 6e |matrix..|may chan|
|00005bf0| 67 65 20 69 6e 20 66 75 | 74 75 72 65 20 76 65 72 |ge in fu|ture ver|
|00005c00| 73 69 6f 6e 73 2e 0a 0a | 5c 62 65 67 69 6e 7b 65 |sions...|\begin{e|
|00005c10| 78 65 72 63 69 73 65 7d | 0a 09 48 6f 77 20 64 69 |xercise}|..How di|
|00005c20| 64 20 74 68 65 20 61 75 | 74 68 6f 72 20 74 79 70 |d the au|thor typ|
|00005c30| 65 73 65 74 20 74 68 65 | 20 66 6f 6c 6c 6f 77 69 |eset the| followi|
|00005c40| 6e 67 20 6d 61 74 72 69 | 78 3f 0a 25 0a 5c 62 65 |ng matri|x?.%.\be|
|00005c50| 67 69 6e 7b 63 6f 64 65 | 7d 0a 5c 65 6e 74 72 79 |gin{code|}.\entry|
|00005c60| 6d 6f 64 69 66 69 65 72 | 73 3d 7b 5b 6f 5d 3d 3c |modifier|s={[o]=<|
|00005c70| 31 70 63 3e 7d 0a 5c 65 | 76 65 72 79 65 6e 74 72 |1pc>}.\e|veryentr|
|00005c80| 79 3d 7b 5c 64 72 6f 70 | 5c 63 69 72 7b 7d 7d 0a |y={\drop|\cir{}}.|
|00005c90| 5c 78 79 5c 78 79 6d 61 | 74 72 69 78 40 75 72 7b |\xy\xyma|trix@ur{|
|00005ca0| 0a 20 41 20 5c 73 61 76 | 65 5b 5d 3b 5b 72 5d 20 |. A \sav|e[];[r] |
|00005cb0| 2a 2a 5c 64 69 72 7b 2d | 7d 2c 0a 09 5b 5d 3b 5b |**\dir{-|},..[];[|
|00005cc0| 64 72 5d 2a 2a 5c 64 69 | 72 7b 2d 7d 2c 0a 09 5b |dr]**\di|r{-},..[|
|00005cd0| 5d 3b 5b 64 5d 20 2a 2a | 5c 64 69 72 7b 2d 7d 5c |];[d] **|\dir{-}\|
|00005ce0| 72 65 73 74 6f 72 65 0a | 20 20 20 26 20 42 20 5c |restore.| & B \|
|00005cf0| 5c 0a 20 43 20 26 20 44 | 20 7d 5c 65 6e 64 78 79 |\. C & D| }\endxy|
|00005d00| 0a 5c 65 6e 64 7b 63 6f | 64 65 7d 0a 24 24 5c 64 |.\end{co|de}.$$\d|
|00005d10| 6f 63 6f 64 65 24 24 0a | 25 0a 09 22 48 69 6e 74 |ocode$$.|%.."Hint|
|00005d20| 22 3a 20 49 74 20 69 73 | 20 61 20 24 32 2a 32 24 |": It is| a $2*2$|
|00005d30| 20 6d 61 74 72 69 78 20 | 61 6e 64 20 74 68 65 20 | matrix |and the |
|00005d40| 61 75 74 68 6f 72 20 75 | 73 65 64 0a 09 7c 5c 65 |author u|sed..|\e|
|00005d50| 6e 74 72 79 7c 5c 2d 7c | 6d 6f 64 69 66 69 65 72 |ntry|\-||modifier|
|00005d60| 73 7c 20 7c 3d 7c 20 7c | 7b 5b 6f 5d 7d 7c 20 61 |s| |=| ||{[o]}| a|
|00005d70| 6e 64 20 7c 5c 65 76 65 | 72 79 7c 5c 2d 7c 65 6e |nd |\eve|ry|\-|en|
|00005d80| 74 72 79 7c 20 7c 3d 7c | 0a 09 7c 7b 5c 64 72 6f |try| |=||..|{\dro|
|00005d90| 70 5c 63 69 72 7b 7d 7d | 7c 20 61 73 20 65 78 70 |p\cir{}}|| as exp|
|00005da0| 6c 61 69 6e 65 64 20 69 | 6e 20 74 68 65 20 6e 65 |lained i|n the ne|
|00005db0| 78 74 20 73 65 63 74 69 | 6f 6e 2e 0a 25 0a 5c 61 |xt secti|on..%.\a|
|00005dc0| 6e 73 77 65 72 63 6f 64 | 65 0a 5c 61 6e 73 77 65 |nswercod|e.\answe|
|00005dd0| 72 74 65 78 74 7b 41 20 | 6d 6f 64 69 66 69 65 72 |rtext{A |modifier|
|00005de0| 20 77 61 73 20 75 73 65 | 64 20 74 6f 20 6d 61 6b | was use|d to mak|
|00005df0| 65 20 61 6c 6c 20 65 6e | 74 72 69 65 73 20 72 6f |e all en|tries ro|
|00005e00| 75 6e 64 20 61 6e 64 20 | 61 6c 6c 20 65 6e 74 72 |und and |all entr|
|00005e10| 69 65 73 0a 09 68 61 64 | 20 61 6e 20 65 78 74 72 |ies..had| an extr|
|00005e20| 61 20 63 69 72 63 6c 65 | 20 61 64 64 65 64 20 28 |a circle| added (|
|00005e30| 74 68 65 73 65 20 74 68 | 69 6e 67 73 20 61 72 65 |these th|ings are|
|00005e40| 20 69 6e 64 65 70 65 6e | 64 65 6e 74 29 2e 20 20 | indepen|dent). |
|00005e50| 46 69 6e 61 6c 6c 79 0a | 09 74 68 65 20 6d 61 74 |Finally.|.the mat|
|00005e60| 72 69 78 20 77 61 73 20 | 72 6f 74 61 74 65 64 20 |rix was |rotated |
|00005e70| 74 6f 20 6d 61 6b 65 20 | 69 74 20 70 6f 73 73 69 |to make |it possi|
|00005e80| 62 6c 65 20 74 6f 20 65 | 6e 74 65 72 20 69 74 20 |ble to e|nter it |
|00005e90| 61 73 20 61 20 73 69 6d | 70 6c 65 0a 09 73 71 75 |as a sim|ple..squ|
|00005ea0| 61 72 65 3a 20 5c 64 69 | 73 70 6c 61 79 63 6f 64 |are: \di|splaycod|
|00005eb0| 65 7d 0a 5c 65 6e 64 7b | 65 78 65 72 63 69 73 65 |e}.\end{|exercise|
|00005ec0| 7d 0a 0a 5c 44 4f 43 4d | 4f 44 45 32 25 25 25 25 |}..\DOCM|ODE2%%%%|
|00005ed0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005ee0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005ef0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005f00| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005f10| 0a 0a 09 54 68 65 20 63 | 6f 64 65 20 69 73 20 74 |...The c|ode is t|
|00005f20| 68 65 20 66 69 72 73 74 | 20 70 72 6f 63 65 64 75 |he first| procedu|
|00005f30| 72 65 20 6f 66 20 7c 5c | 78 79 6d 61 74 72 69 78 |re of |\|xymatrix|
|00005f40| 7c 20 61 62 6f 76 65 3b | 20 74 68 65 20 66 69 6e || above;| the fin|
|00005f50| 61 6c 0a 09 66 61 63 74 | 6f 72 73 20 61 72 65 20 |al..fact|ors are |
|00005f60| 75 73 65 64 20 62 79 20 | 7c 5c 58 59 73 65 74 52 |used by ||\XYsetR|
|00005f70| 43 40 7c 2e 0a 0a 5c 44 | 4f 43 4d 4f 44 45 33 25 |C@|...\D|OCMODE3%|
|00005f80| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005f90| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005fa0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005fb0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00005fc0| 25 25 25 25 25 0a 0a 0c | 0a 5c 73 75 62 73 65 63 |%%%%%...|.\subsec|
|00005fd0| 74 69 6f 6e 7b 45 6e 74 | 72 69 65 73 7d 0a 3f 3f |tion{Ent|ries}.??|
|00005fe0| 3d 5b 65 6e 74 72 69 65 | 73 5d 0a 25 0a 09 54 68 |=[entrie|s].%..Th|
|00005ff0| 65 20 6f 62 6a 65 63 74 | 20 3c 6d 6f 64 69 66 69 |e object| <modifi|
|00006000| 65 72 3e 73 20 75 73 65 | 64 20 66 6f 72 20 74 68 |er>s use|d for th|
|00006010| 65 20 64 65 66 61 75 6c | 74 20 65 6e 74 72 69 65 |e defaul|t entrie|
|00006020| 73 20 63 61 6e 20 62 65 | 20 63 68 61 6e 67 65 64 |s can be| changed|
|00006030| 0a 09 66 72 6f 6d 20 74 | 68 65 20 64 65 66 61 75 |..from t|he defau|
|00006040| 6c 74 20 60 7c 21 43 7c | 20 7c 2b 3d 3c 7c 22 6f |lt `|!C|| |+=<|"o|
|00006050| 62 6a 65 63 74 22 5c 2d | 22 77 69 64 74 68 22 7c |bject"\-|"width"||
|00006060| 2c 7c 0a 09 22 6f 62 6a | 65 63 74 22 5c 2d 22 68 |,|.."obj|ect"\-"h|
|00006070| 65 69 67 68 74 22 7c 3e | 7c 20 7c 2b 3c 7c 24 32 |eight"|>|| |+<|$2|
|00006080| 5c 74 69 6d 65 73 22 6f | 62 6a 65 63 74 22 5c 2d |\times"o|bject"\-|
|00006090| 22 6d 61 72 67 69 6e 22 | 24 7c 3e 7c 27 20 28 77 |"margin"|$|>|' (w|
|000060a0| 69 74 68 20 74 68 65 0a | 09 65 66 66 65 63 74 20 |ith the.|.effect |
|000060b0| 6f 66 20 63 65 6e 74 65 | 72 69 6e 67 20 74 68 65 |of cente|ring the|
|000060c0| 20 6f 62 6a 65 63 74 2c | 20 66 6f 72 63 69 6e 67 | object,| forcing|
|000060d0| 20 69 74 20 74 6f 20 68 | 61 76 65 20 61 74 20 6c | it to h|ave at l|
|000060e0| 65 61 73 74 20 74 68 65 | 20 73 69 7a 65 0a 09 22 |east the| size.."|
|000060f0| 6f 62 6a 65 63 74 22 5c | 2d 22 77 69 64 74 68 22 |object"\|-"width"|
|00006100| 20 74 69 6d 65 73 20 22 | 6f 62 6a 65 63 74 22 5c | times "|object"\|
|00006110| 2d 22 68 65 69 67 68 74 | 22 20 61 6e 64 20 66 69 |-"height|" and fi|
|00006120| 6e 61 6c 6c 79 20 61 64 | 64 20 74 68 65 0a 09 22 |nally ad|d the.."|
|00006130| 6f 62 6a 65 63 74 22 5c | 2d 22 6d 61 72 67 69 6e |object"\|-"margin|
|00006140| 22 29 20 74 6f 20 61 6c | 6c 20 73 69 64 65 73 2c |") to al|l sides,|
|00006150| 20 62 79 0a 25 0a 5c 62 | 65 67 69 6e 7b 64 65 66 | by.%.\b|egin{def|
|00006160| 73 31 7d 0a 7c 5c 65 6e | 74 72 79 6d 6f 64 69 66 |s1}.|\en|trymodif|
|00006170| 69 65 72 73 3d 7b 7c 20 | 3c 73 74 75 66 66 3e 20 |iers={| |<stuff> |
|00006180| 7c 7d 7c 0a 5c 65 6e 64 | 7b 64 65 66 73 31 7d 0a ||}|.\end|{defs1}.|
|00006190| 5c 6e 6f 69 6e 64 65 6e | 74 5c 75 6e 73 6b 69 70 |\noinden|t\unskip|
|000061a0| 0a 0a 5c 44 4f 43 4d 4f | 44 45 28 0a 5c 78 79 77 |..\DOCMO|DE(.\xyw|
|000061b0| 61 72 6e 69 66 64 65 66 | 69 6e 65 64 5c 65 6e 74 |arnifdef|ined\ent|
|000061c0| 72 79 6d 6f 64 69 66 69 | 65 72 73 0a 5c 65 78 70 |rymodifi|ers.\exp|
|000061d0| 61 6e 64 61 66 74 65 72 | 5c 64 65 66 5c 61 64 64 |andafter|\def\add|
|000061e0| 45 51 40 5c 65 6e 74 72 | 79 6d 6f 64 69 66 69 65 |EQ@\entr|ymodifie|
|000061f0| 72 73 23 31 7b 5c 64 65 | 66 5c 65 6e 74 72 79 6d |rs#1{\de|f\entrym|
|00006200| 6f 64 69 66 69 65 72 73 | 40 7b 23 31 7d 5c 69 67 |odifiers|@{#1}\ig|
|00006210| 6e 6f 72 65 73 70 61 63 | 65 73 7d 0a 0a 5c 78 79 |norespac|es}..\xy|
|00006220| 64 65 66 40 5c 65 6e 74 | 72 79 6d 6f 64 69 66 69 |def@\ent|rymodifi|
|00006230| 65 72 73 40 7b 5c 65 6e | 74 72 79 62 6f 78 7d 0a |ers@{\en|trybox}.|
|00006240| 0a 5c 78 79 64 65 66 40 | 5c 65 6e 74 72 79 62 6f |.\xydef@|\entrybo|
|00006250| 78 23 31 7b 5c 68 62 6f | 78 7b 5c 73 65 74 62 6f |x#1{\hbo|x{\setbo|
|00006260| 78 5c 7a 40 3d 5c 6f 62 | 6a 65 63 74 62 6f 78 7b |x\z@=\ob|jectbox{|
|00006270| 23 31 7d 25 0a 20 20 5c | 4c 70 3d 5c 77 64 7a 40 |#1}%. \|Lp=\wdz@|
|00006280| 20 5c 44 70 3d 5c 68 74 | 5c 7a 40 20 5c 61 64 76 | \Dp=\ht|\z@ \adv|
|00006290| 61 6e 63 65 5c 44 70 5c | 64 70 5c 7a 40 0a 20 20 |ance\Dp\|dp\z@. |
|000062a0| 5c 64 69 6d 65 6e 40 3d | 5c 6f 62 6a 65 63 74 77 |\dimen@=|\objectw|
|000062b0| 69 64 74 68 40 20 5c 61 | 64 76 61 6e 63 65 5c 64 |idth@ \a|dvance\d|
|000062c0| 69 6d 65 6e 40 2d 5c 4c | 70 0a 20 20 5c 69 66 64 |imen@-\L|p. \ifd|
|000062d0| 69 6d 5c 64 69 6d 65 6e | 40 3e 5c 7a 40 20 5c 61 |im\dimen|@>\z@ \a|
|000062e0| 64 76 61 6e 63 65 5c 4c | 70 5c 64 69 6d 65 6e 40 |dvance\L|p\dimen@|
|000062f0| 20 5c 52 70 3d 2e 35 5c | 64 69 6d 65 6e 40 20 5c | \Rp=.5\|dimen@ \|
|00006300| 65 6c 73 65 20 5c 52 70 | 3d 5c 7a 40 20 5c 66 69 |else \Rp|=\z@ \fi|
|00006310| 0a 20 20 5c 64 69 6d 65 | 6e 40 3d 5c 6f 62 6a 65 |. \dime|n@=\obje|
|00006320| 63 74 68 65 69 67 68 74 | 40 20 5c 61 64 76 61 6e |ctheight|@ \advan|
|00006330| 63 65 5c 64 69 6d 65 6e | 40 2d 5c 44 70 0a 20 20 |ce\dimen|@-\Dp. |
|00006340| 5c 69 66 64 69 6d 5c 64 | 69 6d 65 6e 40 3e 5c 7a |\ifdim\d|imen@>\z|
|00006350| 40 20 5c 61 64 76 61 6e | 63 65 5c 44 70 5c 64 69 |@ \advan|ce\Dp\di|
|00006360| 6d 65 6e 40 20 5c 66 69 | 0a 20 20 5c 64 69 6d 65 |men@ \fi|. \dime|
|00006370| 6e 40 3d 5c 6f 62 6a 65 | 63 74 6d 61 72 67 69 6e |n@=\obje|ctmargin|
|00006380| 40 20 5c 61 64 76 61 6e | 63 65 5c 4c 70 32 5c 64 |@ \advan|ce\Lp2\d|
|00006390| 69 6d 65 6e 40 20 5c 61 | 64 76 61 6e 63 65 5c 44 |imen@ \a|dvance\D|
|000063a0| 70 32 5c 64 69 6d 65 6e | 40 20 0a 20 20 5c 55 70 |p2\dimen|@ . \Up|
|000063b0| 3d 2d 2e 35 5c 68 74 5c | 7a 40 20 5c 61 64 76 61 |=-.5\ht\|z@ \adva|
|000063c0| 6e 63 65 5c 55 70 2e 35 | 5c 64 70 5c 7a 40 20 5c |nce\Up.5|\dp\z@ \|
|000063d0| 61 64 76 61 6e 63 65 5c | 52 70 5c 6f 62 6a 65 63 |advance\|Rp\objec|
|000063e0| 74 6d 61 72 67 69 6e 40 | 0a 20 20 5c 73 65 74 62 |tmargin@|. \setb|
|000063f0| 6f 78 7a 40 68 7b 5c 6b | 65 72 6e 5c 52 70 20 5c |oxz@h{\k|ern\Rp \|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
